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ВВЕДЕНИЕ 


Актуальность работы. Развитие вычислительной техники и 
расширение области ее применения требуют повышения произво- 
дительности труда в программировании. Одним средством реше- 
ния этой задачи является разработка и внедрение инструмен- 
тальных систем и систем построения трансляторов (СПГ). 

На данном этапе актуальна проблема создания подобных 
систем для персональных ЭВМ, т.к. именно персональные ЭВМ 
применяются в самых разных областях человеческой деятель- 
ности. В то же время ресурсы широко распространенных микро- 
ЭВМ ( объем оперативной памяти, быстродействие и т.п. ) 
обычно весьма ограничены. Поэтсму непосредственное использо- 
вание тех систем и методов, которые разработаны для больших 

<и средних ЭВМ, затруднено, но тем не менее нужно учитывать 
накопленный в этой области опыт. 

В условиях быстрого развития микропроцессорной техники 
нецелесообразно разрабатывать программное обеспечение зано- 
во для каждого нового типа ЭВМ. Таким образом, переносимость 
программного обеспечения является актуальным требованием. 

В практике последних лет средством создания мобильного 
и компактного программного обеспечения микро-ЭВМ (в том чис- 
ле для разработки СПТ) служили расширяемые языки типа ФОРТ 
CI 54, 47; 51, 52, 35, 561 .). 

Актуальной задачей является изучение и совершенствование 
этого инструмента в целях повышения надежности программного 
обеспечения. Необходимо обратить внимание на улучшение мето- 


дов описания и реализации языков программирования в ФОРТ- 


ориентированных СИГ ( [2, 3, 10, II, 12, 18, 19] ) на основе 


егося опыта, 


Цель работы. Основными целями ‘данной диссертационной 
оты являются: 

[. Исследование и разработка методов описания языков npon- ` 
раммирования в ФОРТ-ориентированных СПГ. 

2, Разработка методов, позволяющих повысить надежность сис- 


темы программирования ФОРТ и созданных на ее основе СПІ. 


Методы исследования. В работе используются методы тео- 
и формельных языков и методы теории полугрупп, а также He- 


которые положения технологии программирования. 


Научная новизна. 

І. Определено понятие спецификации ФОРТ-программы и разрабо- 
тан новый формальный алпарат - алгебра спецификаций языка 
ФОРТ. Изучены свойства этой алгебры. 

2. На основе алгебры спецификаций определено понятие кор- 
ректной ФОРТ-программы и предложено решение проблемы ста- 
тического контроля типов для языка ФОРТ. 

I3. Проанализированы существующие методы описания языков в 
ФОРТ— ориентированных СПЕ и введено определение коррект- 
ности таких описаний. 

4, Разработаны методы, позволяющие проверить корректность 

описания исходного языка относительно вышеуказанного оп- 
ределения и выявить некоторые ошибки в этом описании на 


самых ранних этапах реализации языка. 


თ 


Практическая ценность и реализация результатов. Предло- 


. хенные B работе методы позволяют повысить надежность системы 


программирования ФОРТ и созданных на ее основе ОПТ. Пользо- 
вателям <ОРТ-ориентированной CIT предлагаются средства для 
создания и отладки описаний реализуемых языков. 

Все полученные результаты применяются в СПГ ТАРТУ, но 
статический контроль типов для языка ФОРТ можно использовать 
и отдельно. ` | 

СПЕ ТАРТУ резлизована на языке fig-FORTH и внедрена на 


ӘМ CM-4, АррІе-ІІ и Искра-226. 


Отруктура работы. 
В первой главе рассматриваются инструментальные системы 


программирования на базе языков типа ФОРТ. Дается характе- 


ქ ристика таких языков как инструмента реализации компактного 


и мобильного программного обеспечения. Анализируются недос- 
татки языка бОРТ и недостатки существующих ФОРТ-ориентиро- 
ванных СПЕ. Рассматривается ОПТ ТАРТУ, в контексте которой 
применяются основные результаты данной диссертации. В ре- 
зультате анализа уточняются конкретные задачи исследования. 

В разделе Т.Т. обсуждаются некоторые вопросы, связанные 
с областью автоматизированной реализации языков программиро- 
вания. Рассматриваются мобильность программного обеспечения, 
выбор промежуточного языка в трансляторах, создание набора 
абстракций в виде хорошо структурированной совокупности мо- 
дулей и v.n. ( [37] ). Приводятся примеры систем, ориентиро- 
ванных на конкретный язык высокого уровня ( [22] 2. 


В разделе I.2. описываются системы программирования на 


основе "сшитого кода” ( [28] ) и ‘языки типа ФОРТ. Анолизи- 
руются недостатки подобных систем. 

Раздел 1.3. посвящен изучению отечественных ФОРТ-ориен- 
тированных СПТ (рассматриваются 4 системы). 

В разделе 1.4. подробнее описывается конкретный предста- 
витель ФОРТ-ориентированных систем - ОПТ ТАРТУ ( (16, 191). 

В разделе 1.5. приводятся основные выводы первой главы. 

Во второй главе определяется понятие спецификации ФОРТ- 
программы и разрабатывается новый формальный аппарат - ал- 
гебра спецификаций языка ФОРТ. На базе алгебры спецификаций 
определяется понятие корректной ФОРТ-программы и предлагает- 
ся частичное решение одной острой проблемы в языке ФОРТ - 
проблемы контроля типов передаваемых через магазин (стек ) 
параметров. В целях получения практических алгоритмов изу- 
чаются алгебраические свойства полугруппы спецификаций и 
свойства частичного порядка на этой полугруппе. 

В третьей главе рассматривается применение алгебры спе- 
цификаций в ОПТ. Определяется корректность схемы синтакси- 
чески управляемого перевода (СУ-схемы, см. 144, 25] ) „виход- 
ным языком которой является ФОРТ. Доказывается основная тео- 
рема о корректности перевода. На базе этой теоремы создаются 
алгоритмы проверки корректности. Рассматривается практичес- 
кое применение предложенного метода спецификации. 

В заключении перечисляются основные результаты диссер- 
тационной работы и направления дальнейших исследований. 

Список использованной литературы содержит 64 наименова- 
ния. Большая часть этих работ посвящена инструментальным 


системам программирования на базе языков типа ФОРТ. 


В приложении 1 приводится реализация алгебраических опе- 
раций над ФОРТ-спецификациями. 

В приложении 2 излагается реализация статического конт- 
роля типов для ФОРТ-программ. ქ 


Программы в приложениях написаны на языке fig-FORTH, 
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Глава Г. ИНСТРУМЕНТАЛЬНЫЕ СИСТЕМЫ ПРОГРАММИРОВАНИЯ 
НА БАЗЕ ЯЗЫКА ФОРТ i 


$ I.I. Введение 


Наличие инструментальных систем позволяет существенно 
высить производительность труда в программировании. Уке 
рстигнут немалый успех в автоматизации процесса реализации 
зыков программирования. В обзоре [37] обсуждаются некото- 
рые технологические аспекты создания систем построения тран- 
сляторов и обобщается накопленный в этой области опыт. 
Отмечается, что актуальным требованием к програминому 
обеспечению является его переносимость - т.е. способность 
программного обеспечения работать на разных архитектурах 
ЭВМ. В СПГ такое требование привело к попытке разрабатывать 
универсальный промехуточный язык для трансляторов - UNCOL. 
переходе на новую архитектуру следовало-бы переписать 
только џусор-транслятор. К сожалению разработка такого язы- 
ка не удавалась. 

Позже та же идея использовалась для достижения переноси- 
ости конкретных языков - т.н. "р-соде" является промеҳуточ- 


языком в PASCAL --трансляторах, DIANA ~ p АРА-транслято- 


Во многих СПГ переносимость достигается посредством 


ориентации на какой-то широко распространенный язык высокого. 
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ванные на язык PASCAL ; 
YACC, VATS, APARSE - на язык С 


ლ 


ELIMA: - на язык FORTRAN 5 
LINGUA - на язык РЫІ . 

В дальнейшем используем термин "ориентированный на язык 
р", если L является одновременно языком реализации ОПТ и 
объектным языком трансляторов. 

В языках программирования встречаются разного рода абст- 
ракции и понятия, ксторые достаточно универсальны ( цикл, 
подпрограмма, массив, тип данных и т.п.). Поэтому наряду с 
CIT целесообразно создавать набор таких абстракций, позво- 
ляющий разработчику транслятора использовать необходимые по- 
нятия "в готовом виде". Такой набор может, например, пред- 
ставлять собой хорошо структурированную совокупность готовых 
модулей, которая расширяется пользователем ОПТ. Способ opra- 
низации набора абстракций зависит, конечно, от конкретной 
системы, 

Перспективным направлением является создание машин, 
ориентированных на языки высокого уровня. В этой связи в 06- 
зоре [37 ] отмечается, что наличие подобных машин способст- 
вует решению проблемы эффективной генерации кода в трансля- 
торах. 

Рассмотренные направления хорошо согласуются с `концеп- 
циями ФОРТ-ориентированных систем, которым посвящены после- 


дующие разделы данной главы. 


мі 


п 


$ І.2. Характеристика языков типа ФОРТ 


1.2.1. Обзор литературы 


Проблемы производительности труда в программировании бы- 


ли актуальны уже в начале 1960-х годов ( [55] ). Работа над 


‚ инструментальными средствами и технологией программирования 


мини-ЭВМ приводила в 1969 г. к созданию целостной и разви- 
той системы программирования с названием ФОРТ (FORTH) Авто- 
ром языка ФОРТ является Ч. МУР ( [54, 55; 57] ДА 

Более широкое распространение язык ФОРТ нашел в связи с 
появлением микро-ЭВМ, т.к. ресурсы первых микро-ЭВМ были 
весьма, ограничены, а характерным свойством системы ФОРТ яв- 
ляется именно ее компактность. В настоящее время язык ФОРТ 
реализован почти что для всех мини- и микро-ЭВМ. Перечис- 
лим некоторые отечественные реализации : 
- Электроника-60 ГЕЙ, 


--оғ-4 [в], 


- ЕС (комплекс ЕС-7970) ЕФ 
- вәсм-6 [1], 
- Искра-226 |13]. 

Следует подчеркнуть, что язык ФОРТ не является отдельно- 
стоящим феноменом. Те же принципы, которые нашли отражение в 
системе ФОРТ, используются в других разработках, развиваются 
и обобщаются в практике программирования. В этой связи отме- 
тим концепцию "рабочей смеси" [20] и систему ДССП [6]. 

На основе реализации языка ФОРТ лежит т.н. "сшитый код" 


( threaded code ) [28]. Техника "сшитого кода" используется 
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в разных приложениях ( | 33, 42] ), в том числе при разработ- 
ке языков программирования |39, 47, 58 |. Такими языками яв- 
ляются, например, 52016 [59], тез [53], rittn |49), acon 
[6],51/5 , мастс/т и др. 

Языки типа ФОРГ используются в самых разных областях 
граммирования ~ при разработке операционных систем (5? 2 
341), при создании баз данных ( [a] ), в области искусст- 
венного интеллекта ( [29] ), а также в астрономии, в промыш- 
ленности, в образовании, при разработке разных систем реаль- 
ного времени и т.п. ( [387] ). В данной работе рассматрива- 
ется применение языка ФОРТ при автоматизированной реализации 
языков программирования. 

Появление новых, более мощных микро-ЭВМ не закрывает пу- 
ти развития языка ФОРТ ( | 27, 60, 61 | ). Уже созданы т. н. 
ФОРТ-машины ( Го, 4, 34, 48] ), производительность которых 
достигает 20 миллионов примитивных ФОРТ-операций в секунду 
(1481). : 

Полное описание языка ФОРТ содержится в работах [5, 47, 
БІ, 52, 56]. Разработан стандарт 1983 года ( [35] ). 
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1.2.2. Основные концепции языка ФОРТ 


Синтаксической единицей ФОРТ-программы является "слово", 
причем разделителем слов служит пробел. Программирование в 
системе ФОРТ представляет собой постепенное расширение языка 
новыми словами. При определении нового слова можно использо- 
вать все имеющиеся в системе слова. Новые слова включаются 
в язык и уже ничем не отличаются от "стандартных" слов. 
Ядро системы содержит т.н. примитивы, которые реализованы на 
языке ассемблера конкретной машины. Объем машинно-зависимой 
части системы обычно не превышает 2К байт. 

Расширение языка может происходить на разных уровнях : 
а) создание примитивов для реализации понятий некоторой об- 
ласти, связанной с "внешним миром", или для использования 
‚ всех возможностей данной ЭВМ, 

0) определение новых понятий в терминах уже имеющихся поня- 
тий (основной вид ФОРТ-программирования), 

в) расширение языка новыми типами данных, 

г) введение новых хонструкций управления и других понятий , 
влияющих на фазу компиляции ФОРТ-программы, 

д) расширение языка новьми средствами его расширения. 

0 расширяемости языка ФОРТ подробнее написано в работе 
(401. 

ФОРТ-система является открытой - все ее части реализова- 
ны в едином стиле и могут использоваться в прикладных прог- 
раммах. Даке язык ассемблера конкретной машины реализуется 
как совокупность ФОРТ-слов (т.н. ФОРТ-ассемблер). 
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Характерной чертой языка ФОРТ является наличие единого 
механизма передачи данных - магазина. Все понятия ‘получают 
исходные данные из магазина и возвращают результаты в мага- 
зин. Поэтому в ФОРТ-программах используется т.н. обратная 
польская запись ( [25] ). 

Развитость средств расширения и открытость придают сис- 
теме необходимую гибкость - несущественные различия в разных 
версиях языка легко устраняются посредством переопределения 

некоторых понятий. | 
| Небольшой объем машинно-зависимой части, несложная реа- 
лизация и гибкость создают благоприятные условия для дости- 
кения мобильности системы ФОРТ и написанного на языке ФОРТ 
программного обеспечения ( [29] у. 
С точки зрения программиста важным качеством является 
интерактивность языка. Способ передачи параметров через ма- 
газин позволяет тестировать и отладить ФОРТ-программы без 
лишних затрат на создание среды. Если понятие определено, то 
оно готово к выполнению без всяких дополнительных действий. 

Конструкции управления, которые включены в ядро системы, 
являются структурными. Механизм вызова подпрограмм поддерки- 
вает программирование в понятиях нужного уровня. В работе 
[34] отмечается, что использование языка ФОРТ повышает дис- 
циплинированность программистов. 

ФОРТ-программы очень лаконичны ( 143, 62) ). С одной сто- 
роны, такое качество не позволяет читать ФОРГ-программы no- 
верхностно. С другой стороны, ©ОРЇ-программы очень компактны 


во внутреннем представлении. 
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3 Внутреннее представление ФОРТ-программы типично mpeg- 
нет собой “сшитый код", который примерно 1.5 раза ком- 
нее программы, написанной на языке ассемблера. Особенно 
твенный эффект достигается при реализации больших сис- 
ем, Интерпретатор "сшитого кода" примерно IO раз превышает 
скорости интерпретатор языка BASIC, работая лишь 4-5 раз 
иедленнее машинного кода. Данные об эффективности взяты из 
работы [45] . 


Расширяемость языка ФОРТ позволяет настраивать язык на 


выявление базовых понятий для конкретных проблемных областей 
их реализация, вплоть до создания проблемно-ориентированных 
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1.2.3. 0 недостатках языка ФОРТ 


Наряду с преимуществами, которыми обладает язык ФОРТ при 
разработке программного обеспечения микро-ЭВМ, в литературе 
внимание на недостатки этого языка. Обсуждаются сле- 
‘дующие проблемы : 
- ядро языка не содержит арифметики чисел с плавающей точкой 
( [45, 24, 48] ); 
- стандартная файловая система (экраны) является весьма при- 
митивным механизмом, не позволяющим решать более сложные 
задачи в области системного программирования ( [45, 24] s 
- не хватает динамического распределения памяти ( [50] ) ; 
обратная польская запись непривычна программистам ( [50 қ 
24]) y 
Е ФОРТ-программы слишком лаконичны и нелегко читаются ( (45, 
Ш8, 50, 631) ; | 
в языке нет средств контроля типов передаваемых через ма- 
газин параметров (ответственность за свои ошибки полностью 
` летит на пользователе) ( Г24, 45, 50, 63] ). 
В работе (631 отмечается, что большинство ошибок в ФОРТ 
программах связана с неправильным использованием магазина. 
Подчеркивается, что важнейшей задачей при документировании 
ФОРТ-программы является спецификация использования магазина 
программой, т.е. указание числа и типов входных и выходных 
араметров. Такие спецификации существенно повышают читае- 
мость ФОРТ-программ. | : 
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$ 1.3. Применение языка ФОРТ в cim 


1 1.3.1. Общая характеристика ФОРТ-ориентированных ОПТ 


Опираясь на перечисленные в разделе 1.1 направления в 
технологии разработки СПТ, рассмотрим те качества языка ФОРТ, 
которые обосновывают создание ФОРТ-ориентированных ОПТ. 

І. ФОРТ является расптостраненным языком и легко реализуется 
_на микро- и мини-ЭВИ. 

2. Программное обеспечение, написанное на языке ФОРТ, отно- 
сительно мобильно. Такое качество облегчает перенос СПГ и 
построенных в этой системе трансляторов на новые модели ЭВМ. 
3, ФОРТ достаточно эффективен по сравнению с языкёми высоко- 
го уровня ( особенно следует отметить компактность ФОРТ ~ 
программ ). Появление высокопроизводительных ФОРТ-машин в не- 
которой степени решает проблемы эффективности интерпретации 
ФОРТ-программ. 

4. Гибкость и расширяемость позволяют настраивать язык на 
нукную проблемную область и работать в понятиях этой проб- 
 Лемной области. 

5. ФОРТ является открытой системой программирования,все ком- 
поненты которой (ФОРТ-ассемблер, редактор текстов, монитор 
внешних устройств, разные пакеты и т.п.) выполнены в едином 
стиле - этим создана целостная среда программирования, B KO- 
торой используется только один язык. 

Известно, что языки "сшитого кода" использовались при не- 
посредственной реализации языков Pascal [2] „ Extended 
Basic, UCSD Pascal , Lisp (7#I8 дальнейшем идея использова- 
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ния языка ФОРТ в качестве промежуточного языка транслятора 
развивалась и приводила к созданию ФОРТ-ориентированных СПГ. 
Автору данной работы известны четыре системы : 

Т) система "ШАГ" ( Агамирзян И.Р. - ИГА АН СССР, Ленинград), 
I<, 3) ; 

2) система, разработанная в ЛГУ ( авторы Кириллин В.А., 
Клубович А.А., Ноздрунов Н.Р. - Ленинград), Іш, 12] š 

. 8) система, разработанная в РГУ ( авторы Литвиненко A.H., 
Демин С.П. - ВЦ РГУ, Ростов-на-Дону), Uo] : 

4) СПГ ТАРТУ (Томбак M.O., Coo B.K., Пёйал Я.Р. - ТГУ, Tap- 
ту), [15, 16, 17, 16, 19]. 

Все эти системы основываются на языке ФОРТ ( хотя на 
разных версиях ФОРТ-а ), используя ФОРТ как целостную техно- 
логическую среду. Средства описания синтаксиса в этих CHCTE- 
мах разные и не рассматриваются здесь подробнее. Общей чер- 
той является использование расширенного ( ФОРТ-ориентирован- 
ного ) метода семантических процедур, при котором "процеду- 
грами" являются любые средства языка ФОРТ - подпрограммы, ти- 
пы данных, макросредства и т.п. Эти т.н. семантические по- 


_ НЯТИЯ образуют своего рода лексикон языка, элементы которого 


связываются с (абстрактной) синтаксической структурой языка. 
Несмотря на различия в методах установления такой связи 
"можно сказать, что рассматриваемые системы создают средства 
для перевода с исходного языка на язык семантических поня- 
тий. В пункте 1.4.2 излагается один из методов описания та- 


кого перевода. 
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1.3.2. 0 недостатках существующих систем 


Особую роль в СШ играют средства, позволяющие проверить 


корректность некоторых аспектов описания исходного языка 
(напр. алгоритм Кнута для проверки корректности системы 
правил вычисления значений атрибутов [46] ). Наличие таких 
средств повышает надежность создаваемых трансляторов и дает 
возможность обнаружить некоторые ошибки в описании языка на 
самых ранних этапах разработки. 

В первых трех системах, которые перечислялись в предыду- 
цем разделе, упомянутые средства обнаружения ошибок в опи- 
сании семантики языка практически отсутствуют (но имеются 
средства, ‘отладки, которые позволяют выявить подобные ошибки 
позже ). 

Наиболее трудным вопросом в рассматриваемых системах яв- 
ется согласование набора семантических понятий с синтакси- 
eckoit структурой реализуемого языка. Первым шагом при реше- 
MI этой проблемы является создание средств, позволяющих по 
описанию семантических понятий и описанию синтаксической 
структуры проверить те аспекты их согласованности, которые 
являются самыми важными. От выбора таких аспектов зависит ап- 
парат описания семантических понятий. 

Таким образом, актуальной задачей является оснащение су- 
цествующих систем более совершенными средствами отладки опи- 


аний реализуемых языков. 
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81.4. СПГ ТАРТУ 


1.4.І. Общие сведения о системе 


В настоящем разделе рассматривается такая система пост- 
роения транеляторов (ОПТ ТАРТУ), в которой объектным языком 
является язык ФОРТ. Сама система также написана на этом язы- 
ке. 

В общем случае результатом работы ОПТ ТАРТУ являются ин- 
`‘терпретаторы, но если ФОРТ-система оснащена средствами целе- 
„вой компиляции или реализована в виде ФОРТ-машины, то можно 
получить и компиляторы. ОПТ ТАРТУ позволяет построить такке 
трансляторы интерактивных языков программирования и способна 
работать в условиях ограниченной оперативной памяти - в этом 
вырахается ориентированность системы на микро-ЭВМ. 

В целях достижения компактности реализация системы ос- 
овывается на концепции разрекенного дерева вывода ( [ss ; 
pil». 

Рассмотрим теперь методы описания языков в данной СПГ. 
Сначала исходим из предположения, что семантику реализуемого 
языка І. можно представить как описание перевода с языка т, 
она некоторый другой язык М, семантика которого считается из- 
вестной ( см. [23] ). Сложность такого описания зависит от 
выбора языка М. Правила перевода усложняются в случае, если 
язык L содержит конструкцию, которая не имеет аналога в М. 


В таком случае придется моделировать эту конструкцию прави- 


21 


перевода, формализм которых для такой задачи не очень 
обен. Поэтому нецелесообразно строго зафиксировать ‘язык М. 
xe выбрать в качестве M расширлемый язык, то нужно раз- 
и ь описание семантики на две части - перевод с языка L на 
раслиренный) язык М и расширения языка М, которые peann- 
необходимые понятия языка 1, В данном случае в качестве 
a М выбран язык ФОРТ. С одной стороны, этим достигается 
обильность системы, с другой стороны, упрощается аппаратура 
еревода (перевод в постфиксную запись, см. [26], стр.210 ). 
Описание исходного языка в СПТ ТАРТУ состоит из несколь- 
их частей. Рис. І на стр. 23 иллюстрирует связи этих частей 
‘этапами работы транслятора. 

Описание перевода основывается на формализме синтакси- 
ески управляемого перевода ( Га, 25] ) и представляет со- 
й КС-грамматику исходного языка, к правилам которой припи- 
ы т.н. компоненты перевода, Исходная грамматика должна при- 
млехать классу  IR(K) - преобразование в грамматику 
едшествования производится автоматически ( [22] ). В случае, 
полученная гремматика предшествования не позволяет NO- 
гроить MSP -анализатор, пользователю, к сожалению, придется 
реобразовывать грамматику вручную. 

Семантика получаемого в результате перевода ФОРТ текста 
писывается как совокупность ФОРТ-понятий. Некоторые из них 
М.н. IMMEDIATE -понятия) управляют ФОРГ-компиляцией, а oc- 
льные запускаются во время выполнения программы. В терминах 
исания языка можно сказать, что во время ФОРТ-компиляции 


ботают понятия, связанные с коктекстными условиями и стати- 
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ческой семантикой исходного auga В конечном итоге на этом 
этапе компилируется программа, состоящая из понятий динами- 
ческой семантики. Внутреннее представление готовой к выполне- 
нию программы зависит от конкретной ФОРІ-системы. 
Так как ОПТ ТАРТУ ориентирована на микро-ЭВМ, она может 
в дальнейшем служить для ускоренной реализации программного 
обеспечения на "голом оборудовании". 
Пути развития системы : 
- улучшение методов описания реализуемых языков, 
- создание высокоинтерактивных средств для облегчения ра- 
боты пользователя, 
- накопление "лексикона пользователя СПГ" в виде хорошо 
структурированной совокупности ФОРТ-понятий. 
Система реализована на языке  fig-FORTH на ЭВМ : 
- (4-4 (0С-РВ), 
- CM-4 ( UNIX), 
- Apple II, 
- "Искра-226" (разработка ведется). 
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ОПИСАНИЕ ЯЗЫКА Р ТРАНСЛЯТОР 


Исходный текст 


Синтаксический анализ 
и перевод 


ФОРТ-текст 


“сшитый код" 


исание динамической семантики Выполнение 


Данные Результаты 


писание перевода, 


сание контекстных условий 
и статической семантики 


Рис.1 
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1.4.2. Синтаксически управляемый перевод 


Схема СУ-перевода - это кортеж Т = (№,5,Д, Е, 5 ),где 


N - нетерминальный алфавит, 5 “6 М - фиксированный начальный 
символ (аксиома), 2. - входной алфавит, А - выходной алфавит, 
а В - множество правил перевода вида 
Ао “> ЖЖ чет Xp ბებე а 208494 те“ შე АВА А (1) 
(x,€ Ў, ге Д# ‚ү, B €N).. Вектор ( 84»..., В.) 

является некоторой перестановкой вектора ( Ал, ... Ад ). 

Если ( Ви.) = (Ал,...‚ An ა во всех правилах 
перевода из В ‚ то получаем схему т.н. простого СУ-перевода. 

Схема СУ-перевода естественным образом определяет мно- 
_ жество Пар цепочек, выводимых из пары ( S, S ).Первые KOM- 
поненты всех выводимых пар составляют входной язык L4 ‚а 
вторые компоненты - выходной язык Lo . Если (x, у) 
является выводимой парой, то цепочка у называется переводом 
цепочки X. i 

В нашем случае рассматривается перевод на язык ФОРТ, в 
котором большинство конструкций имеет постфиксный вид. Из- 
вестно, что для перевода из инфиксной записи в постфиксную 
достаточно пользоваться такой простой СУ-схемой, в которой 
Zo = eee = 2л = Á ( Л- обозначение пустой строки ). Нам 
придется рассматривать более общий случай, так как некоторые 
ФОРТ-конструкции отличаются от постфиксного вида, а также не 
все исходные языки строго инфиксны. 

В дальнейшем будем использовать такую схему перевода, в 
которой все правила имеют вид 

Ао > x.A4X4A2 +s. რე ქჩებე ს) 08182 +-. BW (2) 

Кири е А. 
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Оказывается, что при помощи правил такого вида мокно за- 
давать любой СУ-перевод. В общем случае для этого придется’ 
разбивать правила вида (Т) на куски вида (2), т.е. вводить 
новые нетерминалы и дополнительные правила. 

В каждой СПТ имеются средства для лексического анализа. 
`Иногда в этой области применяется понятие класса лексем, ко- 
торое позволяет сократить описание исходного языка ( одним 
метасимволом выражается целое множество конкретных лексем ). 
Обычно выделяются классы "идентификатор", "константа" и т.п. 
Для нас существенно, чтобы представители таких классов сох- 
ранялись при переводе. Поэтому будем считать, что Хи Д со- 
деркат одинаковые классы лексем, а соответствующие метасим- 
волы трактуем как нетерминальные. Такое соглашение позволяет 
также переставить представители классов лексем, если это 
° нужно. 


Пример 1. Рассмотрим следующую СУ-схему : 
EN = { Seq, Stm, Dcl, Та, Dim, Const, Var, Idlp, Exp, Mon ү, 


<= FRU „таат, IVAR, CDD, (и, уз SRA (ој, С} 


A= {' , тәне, танат", [r], [©], stg! pes 
8 = Seq MR состоит из правил : 
I) seq - Stn , Stm 
| 2) Seq > 500 ვ. Stm ‚ Seq Stm 
3 Stm > Del : ‚ сі 
4) Stn + Var ':=' Exp ა Exp Var 1! 
5): Del -> “VAR: та ‚ 'VAR' та 
ნ pol -> 'DIM' та ‘Ciuma t Y)", Diu та 
E) № > 


8 E 
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Const 1 s Const 'ARRAY' 


| 8) Dim >. 
9) Const > [c] в E61 

10) Var > Id , та 

11) Var > Idlp Exp "ү › Exp Idlp 
12) тар > rd '('! ‚ та 

13) Ехр > Mon . , Моп 

14) Ехр > Exp '+' Mon + Exp Mon '+' 
15) Mon > Const p s Const 

_ 16) Mon - Var í Var "бу 


_ Здесь [1] обозначает класс идентификаторов, LC] - класс ge- 
лых констант без знака, а апострофы трактуют как метасим- 
волы, выделяющие ключевые слова и разделители. 
_ При такой интерпретации программе 

Var А; dim B(6); А := 43 В(3) := #+2 
соответствует перевод 

VAR А 

6 ARRAY В 

4А1 

492438! 


Tax как правила перевода имеют вид (2), то способ их за- 
дания может быть несколько упрощен. Для этого отбрасываем 


вторые компоненты правил и введем новые обознамения : 
FRE =u, 


POST evy, e 
PERM = (X4 у... Е) задает перестановку вектора 
1,2 8.07; причем i -TAA компонента вектора (Вџ,...,В.) 


определяется как к, -TAA компонента вектора (Ал,...› М). 
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По этой информации вторые компоненты правил вида (2) могут 
быть восстановлены. Для сокращения записи при этом считаем, 
что по умолчанию РВЕ= A , POST = A и PERM = C 1,..., п). 


Пример 2. Для задания СУ-схемы примера 1 достаточно 
дополнить первые компоненты правил перевода (которые обра- 
зуют КС-грамматику исходного языка) следующей информацией : 

4) PERM = (2, 4) , POST = '!' 
5) РВЕ = 'VAR' 

6) PERM = (2, 1) 

8) POST = 'ARRAY' 

II) PERM = (2,1) 

14) POST = '+' 

16) Post = '#' 


Указанный вид схемы СУ-перевода позволяет использовать 


‚ дерево вывода исходной программы (см. [25] ‚ стр.163) для 
‚выполнения перевода. Чтобы обеспечить перевод представителей 


классов лексем, определяем еще FRE и POST для концевых 


вершин дерева вывода следующим образом. В каждой такой Bep- 


шине PRE = Л; если вершине соответствует представитель 
класса лексем ( идентификатор, константа и т.п. ), то прини- 
мается POST = текст лексемы, в противном случае FOST = A. 

Для внутренних вершин PRE , POST и PERM уже определены, 
так как каждой внутренней вершине соответствует некоторое 
правило перевода. 


Приведем теперь алгоритм СУ-перевода на дереве вывода 


| “программы ( w является любой вершиной дерева вывода ). 


АЛГОРИТМ GENTEXT(W) : 


1. Выдать текст РНЕ(ИШ). | 

2. Если V имеет прямые нетерминальные потомки Уд». +.» Vy, 
то переставить их согласно РЕВМ(И) . Вместе с вершинами 
переставллютоя и поддеревья, корнями которых они случат . 

3. Если V имеет прямые потомки изне Vk , то для каждо- 

TO i = 4,...,К ВЫПОЛНИТЬ GENTEXT(W:). 

. Выдать текст POST(W). 

G5, Выход. 


Выполнив этот алгорити на корне дерева вывода получим D 
ыходном потоке перевод входной цепочки. 
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1.4.3. Модификация метода перевода 


Главную трудность перевода составляют структурные разли- 
ЧИЯ входного и выходного языков. СУ-схема является удобным 
средством для перевода отдельных конструкций языков програм- 
_ мирования. Но выбранный неми объектный язык - ФОРТ - nana- 
гает некоторые более обгие требования, которым СУ-схема не 
всегда удовлетворяет. Например, все объекты языка ФОРТ долж- 
ны быть описаны до их использования. Если в реализуемом язы- 
ке такого ограничения нет, то необходимо сначала перевести 
описания, а лишь потом остальную часть. СУ-схема в этом слу- 
чае может оказаться громоздкой и плохо поддающейся методам 
синтаксического анализа ( или такой схемы не существует во- 
обще). В целях преодоления подобных трудностей нам пришлось 
несколько обобщить алгоритм перевода. 

В результате выполнения алгоритма GENTEXT над некоторой 
внутренней вершиной ү дерева вывода мы получим в выходном 
| потоке определенную часть перевода. Обозначим такую часть 
через (ү). Соответствующий отрезок входной цепочки образует 
крону поддерева с корнем V. 

Вышеупомянутую проблему о перестановке описаний можно 
поставить в следующем виде : перевести цепочку 

40745047202 ses ხუ AV nën 
B цепочку 

WaWa see Wut, 
где u; < zu M = DE является кроной поддерева, корень KO- 
торого обозначаем через v, , Ы = TY) ‚а u'eA* 


J 
является оставшейся частью перевода. 
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Чтобы получить более общий алгоритм перевода, будем 


предпологать, что корни поддеревьев, подлежащих переводу 
раньше других (вершины хр» помечены некоторым специальным 
образом. Такие метки при этом можно приписать к правилам 
грамматики исходного языка, так как любой внутренней вершине 
дерева вывода соответствует некоторое правило грамматики. 
Указанные метки будем в дальнейшем называть режимами и обо- 
значать через REG, 

Допускаем в вершинах, которые снабжены режимом, наряду с 
применением алгоритма СЕМТЕХТ возможность некоторых дополни- 
‚тельных действий. Таким образом, REG может иметь разные зна- 
чения для разных правил грамматики. Каждое такое значение 
определяет набор действий, подлежащих выполнению при обра- 
ботке соответствующей вершины дерева вывода. 

Приведем теперь алгоритм, управляющий выполнением дейст- 
вий, определяемых режимами (W является любой вершиной дере- 


ва вывода ). 
АЛГОРИТМ SEARCH(W) : 


54. Если W имеет прямые потоки Wa,..., Wy p ТО для каждого 
і = Ay... k выполнить SEARCH(W;), 
82. Если B вершине ү определен режим, то’; 
82,4. выполнить действия, указанные в REG(W) , 
. 82,2. удалить поддеревья с корнями W,,..., Wk , HO не 
считать вершину W в дальнейшем терминальной вершиной 
( при выполнении шага 62 в алгоритме GENTEX). 
53. Выход. 
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Исходной вершиной для алгоритма SEARCH является корень 
дерева вывода. | 1 
Опираясь на модифицированный таким образом алгоритм пе- 
_ревода, переходим к рассмотрению возмокных рекимов. В данной 
работе опишим лишь два режима, которые уже применялись при 
разработке конкретных трансляторов, но в принципе количество 
режимов не ограничено (пользователю предоставляются средства, 
для расширения набора режимов). 

Режим TRANS в вершине ү означает, что в выходной поток 
поступает перевод поддерева с корнем W . Именно этот ревим 
используется для перестановки описаний. 

Режим — vRANS(W) : 

TI. Выполнить GENTEXT(W). 

Пе, FRE(W) := Л ; POST(W) := Л. 

ФОРІ-программы обычно представляются как т.н. ":" -опре- 
деления (colon définitions). Поэтому введен режим COLON , 
который обеспечит перевод операторов в такие определения . 
Если в вершине w указан режим COLON , то Ф(џ) оформляется 
как отдельное ":"-определение, для которого генерируется 
специальное системное имя. Чтобы в дельнейшем пользоваться 
этим определением, его имя хранится как  FPOST(W), 
Режим  сотом(и): 

СТ. Генерировать новое системное имя. 

02. Выдать строку, состоящую из 7: и системного имени. 

03. Выполнить — GENTEXT(W). | 

(4. PRE(W) := Л; POST(W) : = системное имя. 

Предполагается, что строка 7), закрывающая ":"-опре- 
деление, выдается алгоритмом GENTEXT . 
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1.4.4. Пример перевода 


В качестве примера рассмотрим небольшой исходный язык, 


в котором имеются целые константы, переменные, массивы, опе- 
раторы присваивания и операторы цикла. На стр.34 (таблица Г) 
приведена грамматика этого языка ( левый столбец ), а такке 
описание перевода ( столбцы REG, PRE, POST и PERM ). 
Иллюстрируем перевод при помощи следующей исходной 
программы : 
I xar # ; 


whiie К<6 


В результате выполнения алгоритма SEARCH. над корнем де- 
рева вывода этой программы, получим перевод : 
VARK VARS 5 ARRAY А ; 
: SYS4. 
BEGIN 
мк ә 6 < 
WHILE 
V?5 ӘСТЕ А A Q + vS! 
ука 1+ ҮК ! 
REPEAT 


Ц 
5154 
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В этой ФОРІ-программе все объекты определены до того, 
"как они будут использованы. Также выполняется требование, по 


которому конструкция Ре. 
BEGIN ... WHILE ... REPEAT 


‘должна находиться внутри ":"-определения. В данном случае 
";"-определению дается сгенерированное системное имя SYS!. 
Появление имени 5151 в конце перевода ( использование 
объекта 5151), гарантирует запуск программы. Именно поэтому 
в корне дерева должен быть установлен режим TRANS , 

Понятия Ү? и А? являются расширением ФОРТ-а и управ- 
ляют компиляцией ФОРТ-программы следующим образом : 

а) если идентификатор, который следует за словом V? , не 
является. именем переменной, то происходит прерывание компи- 
ляции и выдается сообщение об ошибке, 

б) слово А? выполняет такуюже проверку для имени массива . 

Например программе var P ; Р(5) := соответствует 
_ перевод 

VAR > 3-5 47 TP } 4 
и сообщение " P не является именем массива" выдается BO вре- 
мя обработки этого ФОРТ-текста. 

Таким образом, контексные условия исходного языка пере- 
водятся в контекстные условия ( расширенного ) ФОРТ-а и 
обрабатываются во время компиляции ФОРГ-текста, т.е. до 
образования выполняемой ФОРТ-программы. Мы не включили про- 
верку контекстных условий в состав алгоритма перевода по 
двум причинам : | 
I) нецелесообразно слишком усложнять формализм перевода, 

2) необходимые средства для подобной работы уже существуют 
в виде возможности управлять ФОРІ-компиляцией. 


ооз олык = 


Id "Со Dim '5' 


1916 Exp ')' 
4 

Mon 

Exp '+' Mon 
Const. 

чаг 

"ИНЕ! Cond 
"ра" Seq "ОП!" 
Exp '<' Exp 


таблица 1 


$ 1.5. Выводы 


1. Анализ применяемых методов описания языков в ФОРТ-ориен- 
тированных ОПТ указывает на необходимость повышения техноло- 


гичности этих методов. 


2. Одним из путей для достижения этой цели является создание 
средств автоматизированной проверки наиболее важных аспектов 
согласованности лексикона семантических понятий и синтакси- 
ческой структуры языка. 

3. Ввиду того, что семантические понятия реализуются на язы- 
ке ФОРТ, существенным аспектом при описании семантических 


понятий является спецификация использования магазина ими. 


4. Для исследования такого аспекта целесообразно создать 


_формельный аппарат. 


5. На основе этого аппарата необходимо уточнить понятие кор- 
ректности описания языка и разработать методы проверки такой 
корректности. 
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Глава 2. АЛГЕБРА СПЕЦИФИКАЦИЙ ЯЗЫКА ФОРТ 


В данной главе опредезяется понятие спецификации ФОРТ- 


программы и вводится новый формальный аппарат - алгебра 


спецификаций языка ФОРГ. Основное внимание уделяется изуче- 
нию свойств этого аппарата. 4 

На базе алгебры спецификаций определяется понятие кор- 
ректной ФОРТ-программы и предлагается частичное решение 
проблемы контроля типов передаваемых через магазин парамет- 


ров ~ статический контроль типов по тексту ФОРТ-программы. 


ФОРТ-понятия обмениваются информацией через магазин дан- 
ных. Ориентированное на челевека описание языка всегда со- 
деркит спецификации использования магазина для всех понятий 
в виде : 

типы входных параметров --- типы выходных параметров. 
Списки типов упорядочены - верхний элемент магазина является 
‚ последним в списке. Количество типов и их имена выбираются 
в зависимости от проблемной области. Для стандарта ФОРТ-83, 
например, перечень имеющихся типов содержится в работе 
[35] ‚ стр. 23-24. 

Если мы рассматриваем типы "адрес" (ad) и " значение " 
(val ), то спецификация понятия "store" (запись значения 
по адресу) пишется в виде [val ай —] a спецификация 
понятия "fetch" ( разыменование ) - в виде [ аа --- vai] TA 
Основой при создании формального аппарата является именно 


такое, привычное для ФОРТ-программиста понятие спецификации. 
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$ 2.1. Основные свойства полугруппы спецификаций 


Введем сначала некоторые обозначения и определения : 
A - алфавит (конечное множество символов), 
дє - множество слов в алфавите À , 
Л = пустое слово (Л < АХ при любом А ), 
jal- длина слова а, | 
ар ~ конкатенация словаиЪ. 
Примечание. Если А = @ ( в данной работе такой случай 
не исключается ), то #%= « Л } 5 
Обозначим т.н. нулевую спецификацию через 0 и определим 
мнокество спецификаций над алфавитом А следующим образом : 
200 80)» сихачуџ {о}. 
Пару (s4, 82)64%х А* обозначим через [54 —- 521. 
< Определим т.н. пустую спецификацию как пару 
САД) = [--- Ах де 
и обозначим ее через T . 
В дальнейшем будем писать Фф вместо фи) +s если из кон: 
текста ясно, о каком алфавите А идет речь. 
Определим теперь произведение (композицию) спецификаций 
следующим образом : 


2) М, ве Фи o} : st= [s4 — s2 JEt —- to ]= 
Las,— t] , если t4 = ав, 
= [sa -— 551, если в, = ხზ, ს. 
О, в остальных случаях. 


Нулевая спецификация характеризует ошибочную ситуацию --- 


несогласованность типов. 
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Следствие Т. Из определения ‚произведения непосредствен- 

но следует, что ` 
o [sa — 921 [ва — tə J] = [м — то] 40 

тогда и только тогда, когда существуют а, b.€ АХ такие, что 
I) а=Л или b-A, 
2) азд = Гл» 
3) as, = bt,, 
4) bto то. 


Пример 3. Рассмотрим алфавит А = {га, val} и вычислим 
произведения некоторых спецификаций над этим алфавитом : 
Da -1 Г- аа 1 = Da -—- аа | 
= аа | [vai — | =o 
[—- аа ] Da аа —] = [лаа == | 
[а& -— vai] [--- аа | = Гра --- val га | 


Теорема 1. Множество ф образует полугруппу с единицей и 
нулем, т.е, : 
D Xs, s b : sed, 

2) Ме, s, t€ Ф : (ms)t = r(st), 
3) Xs < Ó : 31 = 18 = s, 
4) X sed : 50 = 05 - 0. 

Доказательство. 

Справедливость утверждений I, Зи 4 следует из определе- 
ния произведения. 

Для доказательства ассоциативности умножения рассмотрим 
таблицу 2 на стр. 40, в которой приведены все варианты вы- 
бора г, s и t , такие, что либо (rs)t 1 Ф,либо r(st) 19- 
Важно заметить, что B остальных случаях (rs)t = r(st) =0 + 
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Пусть з € Ф . Определим для него элемент 87160 сле- 
дующим образом : 4 
1 если в-0 ,7057 -0 , 
2) если s = [34 — в | 2270. в = [52 => 441: 
= 8 


Непосредственно можно проверить, что ss 1s 


1 


и 


чет 


815571 = 571, В таком случае элемент 871 


называется йнверс- 
ным к элементу S . Для любых элементов зи t имеют место 
равенства (ву! = 671571 и (в71)-1 = 8. 
Выделим из ф некоторые подмножества, которые играют вах- 
ную роль при изучении свойств произведения : 
»2([8—7] | земј, 
в={ [--ъ] | ъа}, 
E = í Те — с] | -«« } Ufo}. 


Соответствующая диаграмма Венна изображена на рис. 2. 


" 


Элементы s » для которых выполняется равенство ss = в, 


называются идемпотентами полугруппы. 


Теорема 2. Справедливы следующие утверждения : 
І) ‘Е является коммутативной подполугруппой с единицей и 
нулем, причем элементы множества в и только они являются 
идемпотентами полугруппы Ф, 
2) L и R являются подполугруппами с единицей, причем s < L 
тогда и только тогда, когда 5716 в, 
3) st = р влечет t € LHM st-€ Б влечет зав, 
Әлв- Фо) имсвуьо {о}, 
5) если в < L Wtd0 илғв фо и + є в, TO справед- 
ливо st d 0. 
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Тазлица 2 


АТ 


Доказательство. 
Г) Замкнутость множества Е относительно умножения, коммута- 
тивность умножения и идемпотентность элементов множества E 
проверяются непосредственно по определениям. Остается пока- 
зать, что больше идемпотентов в полугруппе 8 нет. Для этого 
предположим, ЧТО s= Ге == a] ‚со ја И вв = s, Согласно 
следствию I должны существовать а, b Є АФ такие, что 


(а) а =Лили b =Л, 


(6) ас = c, И 
(в) аа = vc, 
(г) ъа = à. 


Из (6) и (г) следуют равенства а = Д и b = Л. Тогда 
в силу (в) справедливо с = 4, что противоречит предположе- 
ню сја 
2) Справедливость утверждения проверяется непосредственно. 
3) Если 5%-Є L, то существует г, Є A* так, что выполняет- 
ся равенство в%- Lu — 1.8 следствия 1 вытекает, что 
для некоторой b Є 1% имеет место btə= Л. Поэтому t, = A 
и t-€ г. Вторая часть доказывается двойственным образом. 
Д) Любой ненулевой элемент Га --- b] полугруппы ф можно 
представить в виде произведения Га —1[-- 51 . С apy- 
гой стороны, для всех Га — ]= Би [—- СИЕЗ в спра- 
ведливо Га ---] [---ъ] = [a — >] 40. 

Значением произведения Г--- b] Га —]] является: 
а) [с --- |, если а = cb, 
6)Г---а |. если b = аа, 
. B) 0, в остальных случаях. 


Следовательно, Г-- 5) [а —] е RUL Ü {о} š 
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Если алфавит А содержит в точности один символ, то вы- 
полняется равенство RL = RU 1. Поэтому в общем ‘случае. 
нельзя утверждать, что RL =R UL U ío). 

5) Справедливость утверждения вытекает из определений. 

Теорема 2 доказана. 

Если любой элемент 5 полугруппы $ имеет единственный ин- 
версный к нему элемент g ‚ то полугруппа $ называется MH- 


версной. 


Следствие 2. ф является инверсной полугруппой. 
Справедливость этого утверждения вытекает из пункта І 


теоремы 2 и теоремы 1.17 из книги [30], стр. 50. 

Следует отметить, что подполугруппа В и свободная полу- 
группа 1% изоморфны : 

[--- c 1 C—-a] = Ç -— ca]. 

Можно показать, что если ЗЕ L'N { л} то множества 
вида se являются собственными главными правыми идеалами по- 
лугруппы ф, а множества вида $t ‚ где t< R М. {a y 
‚собственными главными левыми идеалами. Более того, ф яв- 
ляется 0-бипростой полугруппой ( см. [30], стр.72-74, IIO), 

ов которой отсутствуют 0-минимальные идеалы ( см. [30]. 
стр. 98 ). Отметим, что бипростым инверсным полугруппам пос- 
вящен $ 8.4 в книге [3r] А 

Идея определения произведения спецификаций таким обра- 
‚зом, как это сделано в настоящем разделе, взята из книги 
[14], гл. ПТ, $6. Теорема 2 уточняет свойства произведения 
(ср. 1141 ‚ стр. 302). 
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$ 2.2. Частичный порядок на пол пе спецификаций 


2.2.1. Свойства частичного порядка 


Определим отношение < на полугруппе ф ‚ полагая в 6% 


-1. Это отношение AB- 


тогда и только тогда, когда st"! = ss 
ляется частичным порядком (доказательство CM. [21], стр. 55). 
1 = 90 = 0,т0 0 < t для любого t< Ó. 


Доказано также, что определенное таким образом отношение 


Так как 0% 


частичного порядка является стабильным , т.е. в < t влечет 
тв < rt, sr {г и 871 < 071. 

Легко показать, что неравенство в < % эквивалентно 
любому из следующих равенств : 
(a sts = в $ 
(6) tss св. 


" 


Теорема 3. Следующие утверждения равносильны : 

D Гы — 1< [s — sJ , 

2) Наса : [s.a —- s2] = Lat — аг% 1, 
ЕЕ 
Г -— a] Ги — t J] = Г — =], 

5 Гы — №] [а —] = Гы — 1. 

Доказательство. 
Пусть Гв, --- s; ] < LV, —- +, |. из равенства (6б) 
сле ует, что 
IV" === $5 1 Ге к s4 | Та. eum 82 1 = Гв, === во |. 
Умнож > обе части этого равенства справа на элемент 
Гв —- 1, получим равенство Геј --- tə Ге — | = 


X а 


44 


Из следствия І вытекает, что существуют а, b < A* такие, 
шо Па=Л ииъ= л, 


2) абд = 54 , 
3) а% = bsp , 
4) Бу 


Следовательно, существует а Є A" ‚ при котором 
Гв --- в, | = Га. --- ato |. 
Если 84 =at} и во = მზე, то [— .. = 
= [— ata JE ta — Д Гом Ге. 
Теперь умножим оба конца этой цепи равенств справа на 
элемент Гвә --- 1 и получим равенство 
[— ва 1 ხე — + J] [в — J -r-—1 
Далее умножим обе части полученного равенства справа на 
элемент | — 84 11. а потом слева на элемент Гв — 1. 
І Таким образом, мы получим равенство 871571 = gri. которое 
© влечет равенство (а). Теорема 3 доказана. 
Так как отношение < является частичным порядком, нас 
интересует, какие элементы сравнимы между собой. Известно, 


что нуль сравним с любым элементом. 


Теорема 4. Следующие утверждения эквивалентны : 
I) s40, t40 и s сравним c t , 
2) существует г $ 0 такой, чо r <s и та, 
3) существует u€ Ф такой, что s 6 u, t Su и либо 
st"! $ ©, либо 87% # 0. 

Доказательство. 

Если ненулевые элементы в и % сравнимы между собой, 
то в качестве элемента г можно использовать минимальный 


ҰЗ них. 
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Если r40 › rgs Иг&% ,TOs#0 ML / 0.#3 
того,что г< S ‚ следует, что существует а Є 4% такое,что 


aSo . С другой стороны, rgt влечет 


и 


гр = 884 и тр 
їр = bt, И гот bt, для некоторого ხ-C ААА Рассмотрим два 
случая. 

а) Если |а| < |b] . то определим а е A* так, что ай = b. 
Тогда в, = 4%) и зә = 452, т.е. в < +. 

6) Если |а| > || ‚ то определим 4-6 4% так, что ხმ = a, и 
получим равенства ty = ds, и %2 = ds, ‚т.е. t < s. 

Для того, чтобы вывести из утверждения Г утверждение 3, 
рассмотрим опять-таки два случая. 

а) Если = < Био 84 = მხ) и 82 = аб при некотором а. 
Теперь Бычяслим произведения 5071. [ata --- 8*4 J #0 и 
s^ = L = — аб, | 40. В качестве ს используем t. 

6) Если %%5, то проведем аналогичное рассуждение и опре- 
делим u = 5, 

Осталось показать, что утверждение 3 влечет утвержде- 
ние Г. Если st £0 или s~s фо тов фо и $ фо. 
в < u означает, что S4 = апд и 8ე=მსე при некотором а. 
Из დს следует, что существует b, при котором %д-би, 
и %2 = bu, . Теперь, как и раньше, придется рассматривать 
два случая. 

а) Если si^ o ‚ то либо существует с Є А , при котором 
t5 = 0685, либо выполняется равенство 88 = dt, для неко- 
торой а -€ A* . В первом случае to = св; = cau, , с одной 
стороны, и to = bup, с другой стороны. Тогда b = са, из 
ч%то получим, что t4 = bua = Сайд = 6S4 И to = ево Т.е. 
t i s . Во втором случае выходит, что а = db, 51 = dt4 и 


Вр = 45, т.е. S 5%. 
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б) Если в7% 4 0 , то проводим аналогичные рассуждения и 
получим, что либо s < t, либо t < 5. : 
Теорема 4 доказана. 
Приведем еще несколько полезных свойств неравенств. 


Предложение Т. Следующие утверждения равносильны в полу- 
группе Ф: 


D s < тв, 

2) s = гв, 

3) ss" бт. 
Доказательство. 


Из того, что з < rs следует, что s rs = 8716. Тогда 


имеет место ва“! rs = ss" |s =s, Умножив оба конца этой цепи 


>. 


справа на элемент 571, получим равенство вв” rss" = 


То же равенство справедливо для инверсных элементов, т.е. 
ав“ вв“ ბა“? = (өз 1у1 $ 
откуда получим 
в8712715871 = ss", 
Это равенство влечет в571 <от, 
Если в = 0,40 все утверждения предложения Т справедли- 
вы. Пусть s = Гв, „E в2 1 1 ©. Тогда г 4 0 и утверждение 


3 принимает вид 
[34 — 821 С з --- 84] € [4 — 2] ‚ т.е. 
[e — 84]: Ги შე |. 


Согласно теореме 3 
Ж = = 
Ba : в. = ат. = arp. 
Вычислим теперь произведение rsi: 


TS = [54 --- г] Г, --- s>] = Lar --- s, | = S. 
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Если 8 = 15 , то, конечно. 5 < гв и предложение І 


доказано. 


“Из предложения І вытекает, что утверждения Ur и 


г = 1 эквивалентны. 


Предложение 2. Следующие утверждения равносильны в полу- 
группе Ф: ქ 
1) в < st, 
2) s = st , 


Предложение 2 доказывается двойственным образом. 


Предложение 3. Пи в уф неравенство s X rst имеет 
место тогда и только тогда, когда существуют а, b, с -€ A* 


такие, что 

I) ary = s4 s 
2) аг: = Әз), 
3) ct, = Ъз, 


4) ев = Sp o 
Доказательство опускается, т.к. этот результат в данной 


работе не используется. 


(Жа) AS 
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2.2.2. Понятия верхней и нижней грани 


| Перейдем теперь к изучению понятий верхней и нижней 
грани подмножеств полугруппы Ф. 
Всякое двухэлементное подмножество is „јеф имеет 
нижнюю грань, которую можно представить следующим образом : 
в ,елиз< +, 
inf (5, s $ eom t <s, 
© , если в несравним C t. 

Дия нас более существенным является понятие ‘верхней гра- 
ни. Предполовим, что для элементов в, t Є eN {ў су- 
цествуот а, b, c, d, e€ A" такие, что в = | aba --- abe ] 
и tz [ъа — ее |, причем если a Л HX c {Л , то 
последний символ слова а не совпадает с последним символом 
слова 0. Тогда существует вир{в, $} = [ъа == be | . До- 
полнительно определим зар т, o} = г для любого r€ Ф. 
Если s и t не могут быть представлены в вышоуказанном 
виде, то множество ქ. 8, t} верхней грани не имеет. 


Предложение 4. Имеют место следующие свойства граней : 
I) Если подмножество M c имеет верхнюю границу, то для 
него существует единственная верхняя грань sup M. 
2) Если подмнохество МС Ф имеет ненулевую нижнюю границу, 
TO inf MEM. | 

Первое свойство следует из того, что между верхней гра- 
ницей и любым конкретным ненулевым элементом подмножества М 


имеется конечное число элементов. 
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Для доказательства второго свойства отметим, что число 
элементов, больших заданной ненулевой нижней границы, конеч- 


. H0, т.е. M является конечным множеством. 


Предложение 5. Подполугруппа идемпотентов ЕСФ являет- 
ся решеткой. 

Доказательство следует из определений (см. также [30] " 
стр. 45 и [9] ‚ стр. 58-66). Если в Є Е , то выполняется 


соотношение 0 5 в < 1. 
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$ 2.3. Понятия корректности и замкнутости ФОРТ-программы 


Полугруппа Š$ была определена как множество спецификаций 
ФОРГ-понятий , ненулевые элементы которого имеют вид 
[а --- 5, где слово а трактуется как список типов, полу- 
чаемых из магазина входных данных, а Ъ как список типов, 
возвращаемых в магазин выходных данных (верхний элемент Ma- 


газина является в списках последним). Нулевая спецификация 


. характеризует ошибочную ситуацию - несогласованность типов, 


Обозначим множество рассматриваемых ФОРТ-понятий через A 
и определим отображение з: A* c Фф: 
D МПД: „(п)< $N (oj является спецификацией 
понятия П, 
2) аЛ) = 4, 


: 3) X we A*, ҰПе A: sM = sws). 


Назовем последовательность ФОРТ-понятий (@OPT-nporpawvwy) 
м = ДҰ корректной, если s(w) фо „ и замкнутой, если 
в(м) = 4. 

Понятия, из которых состоит корректная ФОРТ-программа, 
согласуются по типам рходных и выходных параметров. 

Корректная программа является замкнутой, если у нее нет 


ни входных ни выходных параметров. 


Пример 4. Рассмотрим алфавит 


А, = аа, val) 


и множество понятий 


A= + const, var, plus, fetch, dot, store Y . 


°1 


Определим спецификации 
5( const ) = Г--- val] › 
5( var ) = [a] $ 
 s( plus ) = [va val — vai], 
8( fetch ) = [ аа --- val], 
s( dot) = [уаз — 6 


8( збоге ) = Г val аа — |. 
Программа "const var store" является замкнутой, прог- 
рамма "fetch dot" KOppeKTHa, но не замкнута, и программа 


"const store" ошибочна. 


Процесс проверки корректности ФОРТ-прогроммы и вычисле- 
ние ее спецификации по спецификациям базовых понятий можно 
автоматизировать. В приложении 2 данной работы приведена 


реализация подобного механизма для линейных ФОРГ-программ. 
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Глава 3. ПРИМЕНЕНИЕ АЛГЕБРЫ СПЕЦИФИКАЦИИ 
В ФОРТ-ОРИЕНТИРОВАННЫХ СПЕ 


Основной целью данной работы является оснащение ФОРТ- 
ориентированных СПГ средствами отладки описаний исходных 
языков. В настоящей главе изучаются проблемы корректности 

‚описания перевода с исходного языка на язык семантических 
понятий. Определяется корректность СУ-схемы, выходным языком 
которой является ФОРГ. Доказывается основная теорема о кор- 
ректности перевода. На базе этой теоремы создаются алгоритмы 
проверки корректности. Рассматривается практическое приме- 


нение предложенного метода спецификации. 
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$ 3.Т. Теорема о замкнутости объектных программ 


В области построения транслирующих систем, переводящих 
с исходного языка на язык ФОРТ, возникает проблема коррект- 
ности ФОРТ-программ, полученных в результате перевода. Дан- 
ный раздел посвящен изучению корректности СУ-схемы. 

Обозначим СУ-схему через T = (н, 5,Д, R, S) В дальней- 
шем предположим, что входная грамматика G4 схемы Т является 
приведенной (см. [25] ‚ стр. 175), и рассмотрим только выход- 
ную грамматику 

G, = QA, P, S). 
Выходной язык определяется как множество 
I ={% | $ЕМ R st s Y. 

Предположим, что выходные символы Пе имеют специфи- 
кации s(Il) , т.е, 

` soc Ф\ Хо}. 

По комплекту (А) определяется гомоморфизм 

в: A*> Ф (ом. стр. 50). 

СУ-схема Т называется корректной, если любая выходная 
последовательность t€ Lj является замкнутой, т.е, s(t) = 4. 
Замкнутость (не просто корректность) объектных программ тре- 
буется потому, что магазины ФОРТ-системы скрыты OT пользова- 
теля конкретного транслятора и не могут служить средством 
передачи параметров объектной программе. 

Построим систему неравенств І(Т, в) следующим образом : 
I) каждому нетерминалу А -€ N ставим в соответствие неиз- 
вестную 27(4) € Ф, 

2) заменим правила выходной грамматики на неравенства - из 


правила вида A-> X4 ... Ху построим неравенство 
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2025 14% ს Me Yj = %X) სც ели XQ€ A и 
1; = 649) , если X; C м. 
Если правая часть правила пуста, то положим 200) < 4. 
3) добавим неравенство 4 2(5) » где S- аксиома схемы Т. 
Определим для нетерминальных символов выходной граммати- 
ки следующие вспомогательные множества : 
са) = { (ს, у) < A*x A* | s 8“ му, 
БУ, = {те ж | А mS ow ү š 


Теорема 5 ( основная теорема). Следующие утверждения 
эквивалентны : 
Т) все выходные последовательности СУ-схемы Т замкнуты, 
2) система неравенств І(Т, s) разрешима, 


3) для каждого нетерминала  A-C м существует велечина 


m(A) = sup { (s(vu))”" | (ს, v)-€ саи выполняется 
неравенство ш(л) inf (50 | w е L(A) 1 . 
Доказательство. 4 


Покажем сначала, что из утверждения 2 следует утвержде- 
ние І. Обозначим полученное из решения системы І(Т, в) эна- 
чение неизвестной 7(д) через s(A)M расширим таким образом 
отображение в на множество (N U Д )*, Рассмотрим произвольный 
вывод s 5% шу > мл зде t< Ly, (че са) 
и др € Р (LEN UA), причем не исключено, что 
«ს = /\ ).Согласно утверждению 2 справедливо з(А) < 5(4) . 
В силу стабильности отношения < на каждом шаге вывода 
имеет место неравенство s(uAv)É з(цебу). Отсюда заключаем, 
საი в(3) 6 в($) + если только S mt и е, т.е. 


для »2ex выходных последовательностей схемы Т. Теперь nc- 
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пользуем неравенство 1 < в(5) и получим, что 1 < s(t) для 
всех t€ 1. Согласно предложению І справедливо s(t) = 7. 
Первая часть доказательства завершена. 

Далее предполагаем, что S 24 иду >>“ uwv является 
произвольным выводом, причем  s(uwv) = 1. Тогда, согласно 
пунктам Ги 3 теоремы 3 и пункту 3 теоремы 2, справедливо 
неравенство — (s(vu))^! < з(м).Зафиксируем какую-либо пару 
(u', v!) Є C(A). Для всех у Є L(A) выполняется соотноше- 
ние (з(у'и'))71& зи) ‚ причем (s(v*u1))71 $0, так как 
(s(u*))7 E L и (sG:))”1 49 (пункт 5 теоремы 2). Сог- 
ласно пункту 2 теоремы 4 и пункту 2 предложения 4 сущест- 
вует хотя бы один элемент w'-C L(A) такой, что выполняется 
S(w') = inf t в(ч) | м = ыз}. Величина з(и') является 
верхней границей множества + (sGu))”1 | (u,v) € c(a) b . 
Из пункта І предложения 4 следует, что существует верхняя 
грань m(A) . Так как (s(v'u'))”1ç ш(А), с одной стороны, 
X (s(v'u'))7 e sQw') , с другой стороны, то m(A) и s(w') 
сравнимы согласно теореме 4. Если при этом не выполняется 
неравенство m(A) < s(w') „ TO по определению верхней грани 
и по теореме 3 существует пара (ии; у")-= C(A) такая, что 
s(u"w'v") # 1. Вторая часть доказательства (из утверждения І 
следует утверждение 3) завершена. 

Определим s(A) = int f в(и) | и < ыз) 1 для всех не- 
‚ терминалов д-6 м. Покажем, что комплект величин 
+ га) | д = п}. является решением системы I(T, 5) . Если 
правило À >. Є Р имеет правую часть < -€ L(A) , то BH- 
полняется соотношение в(4)<()Лредположим теперь, что 


* 
% имеет вид 208424 =--2 ‚где 2.< A иву ен. 


р-18р% 
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Рассмотрим вывод 
bc 8 
0-4 ა-ი” > 02204240; 2р-л"р?рУ, 


в котором 5(В,) = S(wi) , т.е. слова Wj являются "минималь- 


» კ 
S S uiv => 0228424 4. 2 


ными" в множествах L(Bi). Пусть W = 207424.. Z p მება MB- 
вестно, что w Є L(A) e Следовательно, s(A) (м). С другой 
стороны, 8(4) = s(w) в силу равенств КО» = 8(В,), Таким 
образом S(A) < 80) для всех правил выходной грамматики. 
_ Из того, что 88 , следует, uro (MA) Є C(S) . Поэто- 
му имеет место (1075) = 8(5) ( слово W! является 


"минимальным" в множестве 1(5) ). Теорема 5 доказана. 


Пример 5. Используем множество понятий примера 4 и рас- 
смотрим выходную грамматику СУ-схемы Т 
<59 -> const (AP dot 


(АУ > <B} const 
ФАУ cw var fetch dot 
Bb > dot «IM? 


Соответствующая система неравенств  I(T,s ) имеет вид 


5 

L --- vai] А | «81 а 
В Г--- val | 

г---1 

L val ===] À 


თ > > ОВ 
A AA A A 
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Оказывается, что эта система неразрешима. Например 
программа : 

" const dot dot var fetch dot const const dot ", 
которая выводима в данной грамматике, He является замкнутой, 
а имеет спецификацию Г vai --- val]. 

Множество L( <А> ) состоит из таких слов W , для кото- 
рых s(w)40 „ причем все в(ч) попарно сравнимы. В то же 
время LC «A» является счетным множеством и не содержит 
минимального элемента, т.е. 

inf 7 9(V) | were <) = 0. 

Именно поэтому в теореме 5 (утверждение 3) нельзя использо- 
вать минимум вместо нижней грани. 


E 


Проблемы, связанные с описанием магазинно-ориентирован- 
ных языков посредством КС-грамматик, изучены в работе [36]. 
Основная теорема этой работы (теорема 28) может в терминах 
алгебры спецификаций сформулироваться следующим образом : 

Если ІҢ = 4 (т.е. имеется в точности один тип), то по 
(выходной) грамматике и по спецификациям терминальных симво- 
лов можно установить, порождает ли эта грамматика безконеч- 
ное множество таких последовательностей, спецификации кото- 
рых принадлежат. подполугруппе в (т.е. множество программ, 
не имеющих входных параметров). 

Идея создания аппарата для проверки корректности описа- 
ний исходных языков в ФОРТ-ориентированных ОПТ взята с pa- 
боты Кнута ( [46] ), в которой подобный аппарат разработан 


для атрибутных описаний. 
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$ 3.2. Алгоритмы, проверяющие корректность перевода 


В данном разделе приводятся алгоритмы, позволяющие по 
СУ-схеме Т и комплекту спецификаций семантических понятий 


в(Д)установить их согласованность. Если СУ-схема некоррект- 


на относительно комплекта спецификаций, то дается дополни- 
тельная информация о причинах несогласованности. Обработка 
исходных данных делится на три этапа : 

Т) вычисление приближенного решения системы 1(Т,в ), 

2) вычисление нижних границ компонент решения, 

3) уточнение решения. 


В алгоритмах будем писать s< t , если в<% из d t. 


| Алгоритм I, Вычисление первого приближения решения 
системы Т(Т,з ). 


Вход: 
бо = (н, Д,Р,5) - выходная грамматика СУ-схемы Т 
( предполагается, что входная грамматика G, является 
приведенной ), 
в(Д) с Фо) - спецификации выходных символов. 
Buxon : 
(ao | в = к) - приближенное решение системы I(T,s) 
или ответ "Система неразрешима". 
Локальные объекты: 
ү - множество символов, для которых вычислены спецификации, 
J- множество порядковых номеров неиспользованных данным. 
алгоритмом правил грамматики, 


а- переменная типа спецификации. 
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Метод : 
I. Положить W :=Ди J (41... ІРІ te 
2. Выбрать такое правило Р; = N > < < Р, при котором 


je J ú <€ ЧЕ, Положить J :- IN {i} СЕЧИ 
3. Если 2j =Л, TO положить а :- Л и перейти к шагу 6. 
4. Если “= Хд... › TO ВЫЧИСЛИТЬ а := Yje + «Хх ‚ где 
У; = s(X,) , если X € A и 
Yi = 1(х,) ‚ если х; Є х. 
5. Если а = ф , то работа алгоритма прерывается и выдается 
сообщение "Система неразрешима" ( дополнительно выдается 
номер правила ј ). 
6. Если Aye м, то 
6.1.. если а и 1(А ) несравнимы, то работа алгоритма 
прерывается и выдается сообщение "Система неразреши- 
ма" ( дополнительно выдается номер правила j , спе- 
цификации аи хар № 

6.2. если q < 10g TO положить чај) := и перейти 
к шагу 8. 

7. Если лу < NN W , то положить хар ша и 
а-а nz | 

8. Если 2% f ( т.е. имеются неиспользованные правила) ‚то 
возвратиться к шагу 2. 

9. Если 1(5) # 1, то работа алгоритма прерывается и выдается 
сообщение "Система неразрешима" ( дополнительно выдается 
спецификация 1(5) ). 

10. Выход. 


Если система І(Т, 5). имеет решение (so» | А = х) i 
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о после работы алгоритма І справедливо условие в(А) < 1(4) 
я всех А -C N. Именно так следует трактовать выражение 


приближенное решение". 


Алгоритм 2. Вычисление нижних границ компонент решения 


системы І(Т,5 ). 


Вход : 
бо = (N,A, Р, 8), 
(Аус $\ {о}, 
410) | А = к) - приближенное решение. 
Выход : 
(so | А € xj - комплект нижних границ 
или ответ "Система неразрешима". 
Локальные объекты : 
W- множество нетерминалов, для которых вычислены нижние 
границы соответствующих компонент решения, 
2- множество порядковых номеров неиспользованных данным 
алгоритмом правил грамматики, 
г, $, а- переменные типа спецификации. 
Метод : ; 
І. Положить с(3) :-0, W = {з} и as фа ENS 
2. Выбрать такое правило РЕ“ м > -Е P, при котором 
Е зи Ape = Положить J LEAN {i} 
3. Если “= Л то перейти к шагу 6. 
4. Если Bs! = Ху... » TO повторить шаг 5 для всех 


1=1,...эк И перейти к шагу 6. 
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В дальнейшем используем следующие обозначения : 
Fa — v] = e), 
Уи = 505), если x Ди 
X 1052; если x = м. 
5. Если X, < к» TO 


" 


5.1. если і = 4 , TO положить T- :- Г-- а], 

в противном случае положить T := [— a] Уд 

5.2. если і = k , то положить t := [ъ —], 

в противном случае положить % := Y; 4... Үү Е --1 , 
5.3. если r-€ Виб- Г (ом. теорема 2), то положить 
абе и перейти к шагу 5.5, 
5.4. если r€ ф\ к или е ФА» » то работа алго- 
ритма прерывается и выдается сообщение "Система не- 
разрешима" ( дополнительно выдаются номер правила j, 
номер символа і, спецификации ги i), 
5.5. если X; < W , vo 
5.5.1. если существует sup (e Ct), a}, то положить 
eO) := sup e), a} и перейти к шагу 5.7, 

5.5.2. если такой верхней грани не существует, то 
работа алгоритма прерывается и выдается сообще- 
ние "Система неразрешима" ( дополнительно выда- 
ются номер правила j , номер символа i , cne- 
цификации аи c(X,) ), 


6. если X. 
^ 1. 
W := W U XL › 
5.7. если 1(X.) < о(Х,) , vo работа алгоритма преры- 
вается и выдается сообщение "Система неразрешима" 


( дополнительно выдаются номер правила j , номер сим- 
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| вола i , спецификации 264) и 104) ls 


5.8. Конец шага 5. 


|6„ Если J # © ( т.е. имеются неиспользованные правила), то 


возвратиться к шагу 2. 


7. Выход. 


. 


Кели система І(Т, в ) имеет решение { а) | лє х}, то 


после работы алгоритма 2 справедливо условие с(4)< 


5(4) 


для всех А-Є N. Именно так следует трактовать выражение 


"нижняя граница компоненты решения". 
Алгоритм 3. Уточнение решения системы I(T, s). 


Вход : 
боз (НА, Р, 8), 
s(A)C $\ (ol : 
{ 1(4) | А < x}- приближенное решение, 
(so) | AE xj- комплект нижних границ. 
Выход : 
(o | іе к) - решение системы I(T, s ) 
или ответ "Система неразрешима", 
Локальные объекты : 
а - переменная типа спецификации. 
Метод; 
I. Боли комплект (io | де n} является решением, 
выход, в противном случае повторить шаг 2 для 
jenes [>] и возвратиться к шагу Г. 


2. Пусть очередное правило ру р имеет вид ^ ა» af 


TO 


Bcex 


E 
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2.1. Если 4ye A , TO конец шага 2. 


2.2. Если == Xa ... X, е (N U AT , то вычислить 


q : Үр... XI ; где 
У, = sQu) , если x< A и 
ті = 1(Х,) ‚ если X; © н. 
2.3. Кли q =O или а и 1(4.) несравнимы, то 


4 


работа алгоритма прерывается и выдается сообщение 
"Система неразрешима" ( дополнительно выдаются номер 
правила j , спецификации а и хар Je 

2.4. Ели q< cCA) ‚ то работа алгоритма прерывается 
и выдается сообщение "Система неразрешима" ( допол- 
нительно выдаются номер правила ј , спецификации 
su, ) иа). 

2.5. Если 24104) s TO положить 1(#.) := а. 


4 
2.6. Конец шага 2. 


Справедливость этих алгоритмов следует из второй части 
доказательства теоремы 5, причем необходимы некоторые допол- 
нительные замечания. 

В алгоритме І приведенность входной грамматики позволяет 
выбрать очередное правило на шаге 2, причем при завершении 
_ работы алгоритма имеет место W -AUN , т.е. компоненты 
ХА) вычислены для всех А є N. Вычисление минимума на wa- 
ге 6.2 алгоритма І ускоряет процесс решения (величины 1(А) 
будут более точными приближениями ). Если непосредственная 
проверка показывает, что (1o | AE з} является реше- 
нием системы, то, естественно, можно опускать последующие 


этапы. 
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В алгоритме 2 выбор очередного правила на шаге 2 также 
обеспечивается приведенностью входной грамматики. При завер- 
шении работы имеет место W =N , т.е. границы с(А) вычис- 
лены для всех #- м. Шаг 5.5.1 опять-таки ускоряет процесс 
решения - величины с(А) будут более точными нижними граница- 
ми. Р 

В алгоритме З вычисление минимума (шаг 2.5) обязательно 
( в этом и состоитфб уточнение решения). Если же процесс уто- 
чнения "зацикливается" то шаг 2.4 гарантирует завершение ра- 


боты. 
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$ 3.3. Практическое применение метода спецификации 


В предыдущих разделах предполагалось, что семантические 
понятия описаны на языке формальных спецификаций. Рассмотрим 
теперь некоторые вопросы, связанные с разработкой таких спе- 
цификаций. 

Оказывается, что описание одних и тех же понятий может 
в разных ситуациях быть разным. В качестве примера приведем 
конструкции управления языка ФОРТ (реализация этих конструк- 
ций излагается в работе [56] ). 

Прикладной программист использует в своей работе специ- 
фикации, описывающие интерфейс управляющих слов во время 
выполнения программы : 

IF [зоо ---| - 
ENDI Г---1 

Ex:E [---] 

BEGIN [-- ] 

AGAIN [— 1 

уния [Boo ---1 

REPEAT |---7 

По этим спецификациям можно сказать, что во время выпол- 
нения программы понятия ІР и WHILE используют верхний 
элемент магазина как булевское значение. Остальные понятия 
на состояние магазина не влияют. 

Системный программист знает, что понятия, связанные с 
управлением, работают во время компиляции ФОРТ-программы. 
Вышеуказанные спецификации отражают лишь то, что понятия IF 


и WHILE компилируют в программу понятие OBRANCH , которое 
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во время выполнения организует переход по условию. "Истинные" 
спецификации конструкций управления, т.е. спецификации, ха- 
рактеризующие использование магазина во время компиляции, пи- 
шутся в виде (см. [56]) E 

m IL — a2 1 

ENDI D ааг --- 1 

EISE Г aa 2 --- айг J 

BEGIN [ --- a1] 

AGAIN Ç аа 4 — ] 

інін [ —- მძ 7] 

REPEAT Гаа 4 ааа — 1 

В данном случае в качестве "типа" используются и конк- 

ретные числа. 
| Выбор имен типов зависит от проблемной области. Если же 
передаваемые параметры плохо классифицируются по типам, то 
можно, например, иметь только один тип - 16845, Несмотря на 
малую информативность спецификаций в таком случае, предло- 
женные средства все-таки позволяют выявить грубые ошибки. 

Чем точнее задаются спецификации, тем больше ошибок мок- 
но найти автоматически. Полезно иметь несколько спецификаций 
одного и того же понятия - для времени выполнения, для време- 
ни компиляции, для магазина возвратов и т.п. Таким путем 
можно выявить ошибки использования этого понятия в разных 
ситуациях. 

. Трудным вопросом является описание динамических свойств 
ФОРТ-понятий. Неформальная спецификация может, например, 
иметь ВИД : 


--- pfa len true / false 
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т.е. в одном случае (в зависимости от конкретных данных) по- 
нятие оставляет в магазине параметры рѓа, len и значение 
"истина", в другом случае только значение "ложь". Предложен- 
ный в данной работе формализм пока еще не охватывает такие 
аспекты. 

Многие проблемы, связанные с описанием свойств ФОРТ- 
программы, являются открытыми. Автор надеется, что методы, 
предложенные в данной работе, оказываются полезными в даль- 
нейших исследованиях. 


3. 


4. 


5. 


ЗАКЛЮЧЕНИЕ 


В диссертации получены следующие основные результаты : 


Разработан метод спецификации ФОРГ-понятий, который сог- 
ласуется с общепринятым способом описания входных и вы- 
ходных параметров ФОРТ-программы. Создан соответствующий 
формальный аппарат - алгебра спецификаций языка ФОРТ. 


Определено понятие корректности ФОРТ-программы относи- 
тельно согласованности типов передаваемых через магазин 
параметров и реализованы средства для статической провер- 


ки такой корректности на основе алгебры спецификаций. 


Проанализированы существующие методы описания и реализа- 
ции языков программирования в ФОРТ-ориентированных СПГ. 
Изучены проблемы корректности описания перевода с исход- 


ного языка на язык семантических понятий. 


Теоретическим исследованием свойств алгебры спецификаций 
проблема проверки корректности описания перевода приведе- 


на к проблеме разрешимости некоторой системы неравенств. 


В виде конкретных алгоритмов реализован метод решения 
этой системы, позволяющий установить корректность описа- 
ний реализуемых языков в ФОРТ-ориентированных СПГ. 
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Полученные результаты позволяют повысить надежность сис- 
темы программирования ФОРГ и созданных на ее основе инстру- 
ментальных систем, особенно СПГ. Методы предложенные в дис- 
сертации, оказались целесообразными и практичными при авто- 
матизированной реализации языков программирования в СИГ 
ТАРТУ, а также при разработке программного обеспечения на 
языке ФОРТ. Предложенная алгебра спецификаций охватывает 
пока только один из существенных аспектов ФОРТ-программы - 
обмен информацией через магазин. Поэтому актуальной задачей 
будущего является усовертенствованив метода спецификации. 
Эта задача, естественно, требует дальнейших теоретических 
исследований и может быть успешно решена лишь при наличии 
богатого практического опыта. 


1 


2 


з. 


5 
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Приложение Г. Резлизация алгебраических операций 


над ФОРТ-спецификациями 


Программы обработки спецификаций описываются в стиле 


словаря. Такой метод является общепринятым в языке ФОРТ. 


55УМВ 


вр 


SZERO 


SCONSTANT 


SVARIABLE 


SARRAY 


в форме:  SSYMB name% 
Определение имени типа ( символа алфавита А ). 


в форме: sE “left-sidey —- right-side} 1 
--- (s-valy 
Ненулевая спецификация. 


{1е25-в14е} , <right-sidey -€ 4% 


--- 48-V81> 
Нулевая спецификация. 


в форме: 4s-val? SCONSTANT «папе 
константа тила спецификации. 


«папе} : --- 4в-уа1» 


в форме: 4s-val SVARIABLE name} 
Переменная типа спецификации. 


(пәше» : --- <5-з4» 


в форме: 44teloments? SARRAY <пәше» 
Одномерный массив спецификаций. 


(naue) : (index) --- <5-ай» 
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5@ <в-ай» --- “<s-val> 


"S-fetch" 

81 Xs-val» <5-ай» --- 
"S-store" 

ЕЙ š <Xs-val> --- 


"S-dot" - вывод на экран. 


5? 55-ға» --- 
59 s. 
5% | <{3-уа1} <5-уг1) --- 45-уа1» 


Произведение спецификаций. 


SZERO- бв-уг1» --- flag 


true, если “<s-val> = 0 


s< ‚ {в-уа1) 4s-val) —- flag 
s> (в-ла1) в-ҹа1у — flag 
Bs C <з-уз1у халат --- flag 
S» есіні eS —- flag 


5<- жат <{з-уа1} --- flag 


S4REL 


SINV 


SLPONLY 


SRPONLY 


SLPLEN 


SRPLEN 


SINF 


-S8UP 
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4s-val) <в-уа1) --- flag 


true, если элементы сравнимы 


<в-у81» <s-valy --- flag. 


true, если элементы несравнимы 


4в-уа1У» --- вілах. 


Инверсный элемент. 


6в-уа1)» --- 48-V81» 
Левая часть: [а == v] => [а —] 


s-val --- <s-val> 
Правая часть: [а --- 6 => [--- €] 


65-у91» --- int 


Длина левой части / -І, если (в-уа12-0 


<s-val --- int 


Длина правой части / ~I 


4s-val) <в-уа1) --- <s-val> 


Нижняя грань двухэлементного подмножества. 


€4s-v21) <Xs-val> --- <s-val> true / false 


Верхняя грань, если она существует 
(flag = true). 
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БСА # 90 


1 SPECIFICATION HANDLING -- TARTU 1985 
А JAANUS РОТА ) 
ВАЗЕ 9 DECIMAL 


{ WORDS TO DPERATE WITH SYMEOLS ) 


0 VARIABLE 4SYMB ( # SYMBOLS IN USE ) 
: SSCONS 

{ DEF: CODE SSCONS NN ; USE: --- CODE ) 
DUP 128 U< IF «BUILDS , ELSE CR 
." IMPOSSIBLE CODE " , QUIT ENDIF 
DOES) 9 ; 

0 SSCONS SSPATT í PATTERN 7 

: SSYMB? ( РРА --- FLAG ) 

$ 7 SSPATT 9 =; 

128 ARRAY SSNFAS ( МАМЕ FIELD AD.-S ) 
42 CONSTANT М.р 


; S8INIT ( ——- ; USERS WORD TO START ) 
128 0 DO Q I SSNFAS ! LOOP © #5ҮМВ ! ; 


SSINIT 
— 
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€ SPECIFICATION HANDLING 

USERS LEVEL ТО OPERATE WITH SYMBOLS ) 

: SSYMB ( MAIN WORD ТО CREATE SYMBOLS. 
DEF: SSYMB NN ; USE; --- CODE ) 

#5ҮМВ 9 1+ DUP SSCONS #5ҮМВ ! 

LATEST $SYMB 9 SSNFAS ! ; 

: МЫЗУМВ ( WORD ТО DEFINE SYNONYMS. 

DEF: CODE AUXSYMB NN ; USE: --- CODE ) 

DUP 128 UK OVER SSNFAS ð O= 0= AND IF 
580045 ELSE CR ." ILLEGAL AUX " , QUIT 
ENDIF : 

: EXGLTSYMB ( IN FORM: EXALTSYMB NN 

AUX-SYMBOL NN WILL BE TREATED ñS MAIN ) 

-FIND ТЕ DROP DUP SSYMB? IF DUP NFA SWAP 
СЕА EXECLITE SSNFAS ! ELSE CR NFñ ID. 

|." IS МОТ А SYMBOL" QUIT ENDIF ELSE CR 

HERE COUNT TYPE ."  ??" QUIT ENDIF ; 

: 88. ( CODE --- ; SYMBOL OUTPUT ) 

DUP Q > OVER 128 < АКО IF SSNFAS 9 DUP 
ТЕ ID. ELSE DROP CR ." SS QUTFUT ERROR" 
DUIT EMDIF ELSE DUP 128 > QVER 160 < AND 

IF 3i AND O DO WLD EMIT LOOP SPACE ELSE 
+" ILLEGAL CODE " , QUIT ENDIF ENDIF ; 
Sd \ I 
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{ SPECIFICATION HANDLING WORDS ) 

16 CONSTANT SSIZE ( МАХ SPECIF. SIZE ) 
і SCOUNTS (5 AD --- 25421112) 

DUP 2+ SWAP СӘ OVER 1 - СӘ; 


: SZERO- 4 АП --- FLAG ) 
SCOUNTS + 2+ SWAP DROP SSIZE >; 


: 8. ( AD —- ; SPECIF. OUTPUT ) 

DUP S2ERO- IF DROP ." SZERO " ELSE 
SCOUNTS ." SE " ROT ROT DUP IF © DO DUP 
СО SS. 1+ LOOP ELSE DROP ENDIF ." —— " 
SWAP DUP IF O DO DUP СӘ SS. 1+ LOOP ELSE 
DROP ENDIF DROP ." 3 " ENDIF ; 

0 VARIABLE SRSTFLAG 

: SRSTEST ( AD — 1 

DUP SCOUNTS >К + R> DUP IF 0 DO DUP СӘ 
128 > IF 1 SRSTFLAG ! OVER SCDUNTS DROP 
DUP IF Q DD OVER Са OVER СӘ = IF 0 
SRSTFLAG ! LEAVE ENDIF 1+ (ООР ELSE DROP 
ENDIF DROP $RSTFLAG 3 IF DROP CR S. 

." IS NOT CORRECT" GUIT ENDIF ENDIF 1+ 
LOOP ELSE DROP ENDIF DROP DROP ; 

--» 
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{ БРЕСТЕТСАТТОМ HANDLING WORDS ) 
НЕВЕ 255 С, 255 С, CONSTANT SZERO 
: SWINCR? ( AD — FLAG ) 
0 SWAP SCDUNTS + DUP IF 0 DQ DUP СЗ 128 
> IF SWAP DROP. 1 SWAP DUP СӘ 52 + QVER 
С! ENDIF 1+ LOOP ELSE DROP ENDIF DROP ; 
0 VARIABLE SWRENOLD © VARIABLE SWRENNEW 
1 SWRENAME ( AD --- ) 
129 SWREMNEM ! DUP SCOUNTS DROP DUP >К 
+ R> 0 DO 1 - DUP CƏ 160 > IF DUP C3 
SWRENOLD ! OVER SCOUNTS + 0 DO DUP СӘ 
SWRENOLD а = IF SWRENNEW Ә OVER C! 
ENDIF i+ LOOP DROP 1 SWRENNEM +! ENDIF 
LOOP DROP DROP ; 
: SUNORM ( AD — > 
DUP SZERO- IF SZERQ SWAP 2 СМОУЕ ELSE 
DUP SRSTEST DUP SWINCR? IF ЗНАЕМАМЕ ELSE 
DROP ENDIF ENDIF : 

|: LONG= ( Арі AD2 L — FLAG ) 
Ж >R >R 1 R> R> R> DUP IF 0 DO OVER СӘ 
OVER СӘ = Q= IF Ж ƏR DROP 0 R> R> LEAVE 
ENDIF 1+ SWAP 1+ SWAP LOOP ELSE DROF 
ENDIF DROP DROP ; 
--» 
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4 SPECIFICATION HANDLING WORDS ) 
VARIABLE SLDIFF 

SLESS? ( Арі AD2 --- FLAG ) 

ER СЭ QVER СЭ - SLDIFF ! QVER DUP СӘ 


АР LONG- IF OVER DUP СЭ + 2+ SUDIFF 3 
OVER DUP DUP СЭ + 2+ SWAP 1+ C3 LONG- 
F DRÜP DROP 1 ELSE DROP DROP © ENDIF 
SE DROP DROP Q ENDIF ELSE DROP DROP 0 
DIF + 

1 NISREL ( Арі AD2 --- REL ) 

IER СӘ OVER СӘ = IF DUP С» OVER 1+ СӘ 
2+ LONG- IF 4 ELSE Q ENDIF ELSE OVER 
9 OVER СӘ > IF SLESS? IF 1 ELSE 0 


КОТЕ ENDIF ENDIF : 


1 SWAP SCQUNTS + DUP IF 0 DO DUP C3 128 
> IF >К DROP,O R> LEAVE ENDIF 1+ LOOP 
ELSE DROP ENDIF DROP ; 

E 
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1 SPECIFICATION HANDLING WORDS ) 
: SREL ( Арі AD2 —- REL ) 

OVER SZERO- IF DUP SZERO- IF DROP DROP 
4 ELSE DROP DROP 1 ENDIF ELSE DUP SZERU- 
IF DROP DROP 2 ELSE OVER СЭ OVER СӘ - 
Ж OVER 1+ СӘ OVER 1+ ГӘ - R> = IF OVER 
СӘ QVER СЭ < IF OVER NOWILD? ELSE DUP 

NOWILD? EMDIF IF 

NZSREL ELSE DROP DRGP O ENDIF ELSE DROP 
DROP 0 ENDIF ENDIF ENDIF ; 

: ALIGN (М — N) 142 / 24; 

: БРТОНЕКЕ ( AD -— ) 

DUP SZERO- IF DROP SZERO НЕВЕ 2 ALLOT 
2 CHOVE ELSE HERE OVER DUP СӘ SWAP i+ 
СЭ + 2+ ALIGN DUP ALLOT СМОУЕ ENDIF ; 
: SCONSTANT 

«BUILDS SPTOHERE DOES» ; 

s SVARIABLE 

«BUILDS HERE 2* , HERE SSIZE ALIGN DUP 
ALLOT CMOVE DOES? ;- 

ey 
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( SPECIFICATION HANDLING WORDS ) 
$2 CONSTANT #AUXSP 

: SPARRAY 

«RUILDS SSIZE * ALIGN ALLOT 

DOES» SWAP SSIZE X +; 

#AUXSP SPARRAY SPAREA 

0 VARIABLE SPLISED 2 
: SPMEM ( --- AD ) 

SPUSED Ә ВАЦХОР MOD SPAREA 

БРИЗЕЮ +! : 

VARIABLE SPCUR 

VARIABLE SCANAREA 52 ALLOT 
VARIABLE SCPTR r 
VARIABLE SCCEIL 
VARIABLE SPMOFFSET 
VARIABLE SPLRFLAG 
SSFIND ( NFA --- РРА/О ) 

BEGIN ӘСАМАКЕА SWAP (FIND) IF DROP DUP 
S8YMB? IF 1 ELSE LFA 9 0 ENDIF ELSE О 1 
ENDIF UNTIL š 


-255555- 


SER 4 97 


{ SPECIFICATION HANDLING WORDS ) 

s MAKESMB ( CODE ——- ) 

SPCUR 9 SPMOFFSET 9 DUP SSIZE < IF + С! 
1 SPMOFFSET +! SPCUR 9 SPLRFLAG 9 + DUP 
C9 1+ SWAP С! ELSE DROP DROP DROP 

СВ ." TOO МАМУ SYMBOLS" QUIT ENDIF ; 

> MAKEULD ( —- ) 

BCAMAREA СЭ 128 + MAKESMB ; 

: MAKESS ( РҒА --- ) 
CFA EXECUTE MAKESMB ; 
: NLD? ( === ) 

SCANAREA DUP СӘ 0 DQ 1+ DUP СӘ ШІП = 0= 
ТЕ DROP CR ." ILLEGAL SYMBOL " SCANAREA 
UNT TYPE DUIT ENDIF LOOP DROP : 

: WLDORSEP ( -— ) I 

LRFLAG 9 IF WLD? MAKEWLD ELSE SCANAREA 
1+ СӘ 45 = IF 1 SPLRFLAG ! ELSE 0? 
MAKEWLD ENDIF ENDIF ; 

--> 


SER # 98 


{ SPECIFICATION HANDLING WORDS ) 

1 SPHAKE ( --- ) 

95 WORD HERE 1+ SCPTR ! 

НЕВЕ БИР СЭ + 1+ SCCEIL 1 SCCEIL 9 

REL OVER С! 1+ 95 OVER С! 1+ BL SWAP С! 

SPMEM SPCUR ! 2 SPMOFFSET ! © SPCUR 9 С! 
0 SPCUR 9 1+ C! 0 SPLRFLAG ! 

BEGIN SCPTR 3 BL ENCLOSE SCPTR +! OVER 

- 31 AND >R R SCANAREA С! + DUP SCCEIL 

3 < SWAP SCANAREA 1+ R> 1+ СМПУЕ WHILE 

CONTEXT 9 Ə SSFIND DUP IF MAKESS ELSE 

DROP LATEST SBFIND DUP IF MAKESS ELSE 

DROP WLDORSEP ENDIF ENDIF REPEAT 

SPLRFLAG Э IF SPCLIR ა ЗИМОВМ ELSE CR 

." RIGHT PART МОТ FOUND" QUIT ENDIF + 

: (SD R 2+R>9 Ж ; 


r: SL 

БРМАКЕ STATE 9 IF COMPILE (51) HERE 0, 
SPCUR 9 SPTOHERE HERE SWAP ! ELSE ЗРСИВ 
9$ ENDIF ; IMMEDIATE 

— 


SCR И 99 
( SPECIFICATION HANDLING WORDS ) 


: SUBSTI ( AD --- š SWRENOLD.SHRENNEM ) 
SCOUNTS + DUP IF Q DO DUP СӘ SWRENOLD 9 
= ТЕ SWREMNEM 9 OVER C! ENDIF 1+ LOOP 
ELSE DROP ENDIF DROP + 

i MPREN ( SQURCEAD DESTAD --- ) 

129 SWRENNEW ! OVER OVER SSIZE СМОУЕ 
OVER SCQUNTS DROP DUP >R + R> DUP IF 0 
DO i - DUP СӘ 128 > IF DUP Са SWRENOLD 
! OVER SURSTI SWRENMEM 9 © SURENNENW ! 
УК DR >R DUP SUBSTI R> R> R> 1+ 
ВИРЕММЕМ ! ENDIF LOOP ELSE DROP ENDIF 
DROP DROP DROP ; 

თო 


SCR 4 100 
{ SPECIFICATION HANDLING WORDS ) 


: MPSS ( 00180 QüP2AD DESTAD --- ) 
Ж OVER 1+ ГӘ OVER СӘ > IF OVER СЭ R C! 
OVER SCQUNTS DROP R 2+ SWAP СМОУЕ OVER 
SEOUNTS >R + OVER СЭ R> SWAP - DUP R i+ 
С! В SCOUNTS DROP + SWAP СМОУЕ SWAP 
DROP SCDOUNTS >R + R> R SCOUNTS + + OVER 
В i+ DUP ГӘ ROT + DUP R (ГӘ + SSIZE > IF 
DRGP DROP DROP DROP DROP R> DROP CR 
." TOO LONG PRODUCT" QUIT ENDIF SWAP С! 
SWAP СМОУЕ ELSE OVER OVER СЭ SWAP 1+ СӘ 
-RC! DUP.1* C9 R 1+ C! DUP 2+ R 2+ R 
СӘ СМОУЕ QVER SCDUNTS DROP В SCOUNTS 
DROP + SWAP DUP Я СЭ + DUP R 1+ C9 + 
SSIZE > IF DROP DROP DROP DROP DROP DROP 
R> DROP СК." TOO LONG PRODUCT" QUIT 
ENDIF В C! CMOVE SWAP DROP SCOUNTS DROP 
+ В SCOLINTS >R + R> СМОУЕ ENDIF R> DROP 


SCR # 101 
€ SPECIFICATION HANDLING WORDS ) 


: ок ( Арі AD2 —- 405 ) 

OVER SZERU- IF DROP DROP SZERO ELSE DUP 
SZERO= IF DROP DROP SZERO ELSE 

^R SPMEM DUP >R SSIZE СНОМЕ КУ R> SPMEM 
DUP >К SSIZE СНОЈЕ R> DUP SWINCR? DROP 
О SPLRFLAG ! OVER 1+ СӘ OVER СӘ MIN DUP 
IF Ж OVER SCOUNTS + + OVER SCDUNTS 
DROP + R> 0 DO 4 - SWAP 1 — SWAP 

DUP СӘ 128 < IF წყლი СӘ 128 < IF OVER 
СӘ QVER СЭ = Q= IF 1 SPLRFLAG ! LEAVE 
ENDIF ELSE OVER СӘ SHREHDLD ! DUP СӘ 
ЗЫВЕММЕМ ! >R OR >R DUP SUBSTI R> R> R> 
ENDIF ELSE QVER СФ SWRENNEW ! DUP СӘ 
SWRENDLD ! >К >В DUP SUBSTI R> R> ENDIF 
LOOP DROP DROP ELSE DROP ENDIF 
SPLRFLAG 9 IF DROP DROP SZERO ELSE OVER 
OVER SPHEM DUP SPCUR ! MPSS DRDP DUP 
SPCUR 3 SWAP MPREN ENDIF ENDIF ENDIF : 


--> 


SCR 9 102 
{ SPECIFICATION HANDLING WORDS ) 


: SLPONLY © AD —- AD ) 
DUP SZERQ- IF DROP SZERO ELSE SPMEM 
OVER OVER SSIZE СМОМЕ SWAP DROP © OVER 
1+ C! ENDIF ; 


т SRPONLY ( Ар — AD ) 

DUP SZERO- IF DROP SZERD ELSE SPMEM 
OVER i+ Са OVER 1+ C! 0 OVER C! OVER 
SCOUNTS >R + OVER SCOUNTS DROP + R> 
CMOVE SWAP DROP DUP SWNORM ENDIF : 


: SINY ( AD -— Ар) 
DUP SIERO- IF DROP SZERO ELSE БРМЕМ 
OVER СӘ OVER 1+ С! OVER 1+ СӘ OVER C! 
ÜVER SCDUNTS 28 + DVER 2+ RY СМОУЕ DVER 
SCOUNTS DROP УВ OVER SCDUNTS DROP + R> 
CMOVE SWAP DROP DUP SWNORM ENDIF : 

--> 


SCR # 103 
| SPECIFICATION HANDLING WORDS ) 


: SPROJMAX ( Ар — Ар ) 

DUP SZERO= IF DROP SE --- 1 DUP CR 

4" WARNING: PROJECTION OF SZERD IS " S. 
ELSE DUP SCOUNTS MIN SWAP DROP.DUP ТЕ 
О SLDIFF ! OVER DUP 2+ SWAP SCOUNTS DROP 
+ ROT Q DO OVER SLDIFF 3 + C3 OVER 
BLDIFF 9 + C3 = IF 1 SLDIFF +! ELSE 
LEAVE ENDIF LOUP SLDIFF ჯა IF SLDIFF 9 + 
ЭВ SLDIFF 9 + Ж 5РМЕМ OVER SCDUNTS 
SLDIFF 9 ~ SR SLDIFF 9 - >R DROP R> 
DVER C! R> OVER 1+ C! DUP SCDUNTS DROP 
R> ROT ROT СМОУЕ DUP SCOUNTS >R + R> R> 
ROT ROT СМОУЕ SWAP DROP ELSE DROP DROP 
ENDIF ELSE DROP ENDIF ENDIF ; 


: SINF ( ADI дра -— арх ) 

OVER OVER SREL DUP O= IF DROP DROP DROP 
SZERO ELSE 2 = IF SWAP DROP ELSE DROP 
ENDIF ENDIF ; 


= 


SCR 4 104 
% SPECIFICATION HANDLING WORDS ) 


8< ( Арі Ар2 -— FLAG ) SREL 1 

S> ( AD1 Ар2 — FLAG ) SREL 2 

8= ( Арі Ар2 —- FLAG ) SREL 4 

S-REL ( ADI AD2 ——— FLAG ) SREL 
S+REL ( Арі #02 —- FLAG ) S-REL 
бре SREL 6 AND бе 0= ; 2 

8<= SREL 5 AND 0= 0= ; 


ини 


s SRPLEN (5 ñD --- 12 ) DUP SZERQ= IF 
DROP -1 ELSE 1+ СӘ ENDIF ; 


1 SLPLEN ( AD --- L1 ) DUP SZERO- IF 
DROP -1 ELSE СӘ ENDIF ; 


: 59 ( VARAD --- AD ) 9 ; 

s 8! ( AD VARAD —— ) 9 SSIZE CMQVE ; 

і 8? ( VARAD --- ) S3 S. 1 

: SARRAY r 

‚ SRUILDS 0 DO HERE 2+ , SSIZE ALIGN ALLOT 
LOOP DOES) SWAP SSIZE ALIGN 2+ * +; 
>> 

SCR # 105 


{ SPECIFICATION HANDLING WORDS ) 

: MAKESUP ( Арі Ар2 ADPR --- ADSUP ) 
СӘ ROT DUP SPCUR ! СӘ QVER - SLDIFF ! 
DOVER СӘ SWAP - SLDIFF 9 O- IF DROP DROP 
SPCUR 9 ELSE DUP 0= IF DROP ELSE DUP 
SLDIFF 9 MIN 0 DD QVER 1+ OVER + СӘ 
SPCUR 9 1+ SLDIFF 9 + СӘ DUP 128 < IF 
OVER 128 < IF = IF 1 - SLDIFF 9 1 - 
SLDIFF ! ELSE LEAVE ENDIF ELSE DROP DROP 
LEAVE ENDIF ELSE DROP DROP LEAVE ENDIF 
LOOP DROP DROP SPMEM SPCUR 9 C3 SLDIFF 
$ - OVER C! SPCUR 9 1+ СӘ SLDIFF 9 — 
OVER 1+ C! SPCUR 9 2+ SLDIFF 3 + OVER 
SCQUMTS DROP СМОМЕ SPCUR 9 SCOUNTS DROP 
+ SLDIFF ჯა + OVER SCOUNTS >R + R> СМОУЕ 
ENDIF ENDIF : 

: -SSUP ( Арі AD2 --- ADS 1 / 0) 
OVER SZERO- IF DUP SZERO- IF DROP DROP 
SZERO 1 ELSE SWAP DROP 1 ENDIF ELSE 

DUP SZERO- IF DROP 1 ELSE QVER SPROJMAX 
OVER SPROJMAX OVER S= IF MAKESUP 1 ELSE 
DROP DROP DROP © ENDIF ENDIF ENDIF ; 


BASE ! 
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Приложение 2. Реализация статического контроля типов 
для. линейных ФОРТ-программ 


Предлагаемые средства позволяют по спецификациям базовых 
понятий и по ФОРТ-тексту получить сведения о корректности 
этого текста. Тестируемые тексты могут содержать ":"-опреде- 
ления и определения переменных ( слова ";" и " VARIABLE " 
пергопределены таким образом, чтобы обеспечить вычисление 
спецификаций новых понятий ). Все базовые понятия необходимо 
описывать ( неописанные понятия работают согласно "старому" 
определению, если такое имеется в системе ). В результате 
обработки ФОРТ-текста вычисляются спецификации понятий, KO- 
торые определяются в этом тексте, и пользователь может зака- 
зать их вывод на экран. 


COLDEP в форме: <8-уа1» COLDEF (name? 
Определение спецификации базового понятия. 


PRSPOF в форме: FRSPOF <пәше) 


Вывод спецификации понятия на экран. 
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SCR % 150 


{ FORTH - STATIC ТҮРЕ CHECKING ) 

SE — 3 SVARIABLE SACCU 

s CASP € Ар --- ) 

BACOU БӘ SWAP 5% SACCU S! ; 

r COLDEF ( «БУА ШЕУ COLDEF «МАМЕ» ) 
<BUILDS SPTOHERE DOES» COLSP ; 

s PRSPOF % PRSPOF «NAME? ) 

-FIND IF DROP DUP 9 9 ' COLSP CFA = IF 
2% S. ELSE NFA ID. ." ?!" QUIT ENDIF 
ELSE HERE COUNT TYPE ." ?" QUIT ENDIF ; 
1 <: [COMPILE] : ; IMMEDIATE 

r> ЇСОМРИ ЕЈ ; ; IMMEDIATE 


SSYMD AD 

: VARIABLE 

DROP SL — AD 1 COLDEF ; 

4:2 

<RUILDS SL --- 1 РЫР SACCU S! HERE 5512Е 


ALIEN DUP ALLOT СМОУЕ DOES» CDLSP ;> 


«3 რ 
ЗАССИ SƏ LATEST PFA 2% SSIZE CMOVE i> 


{ ТУРЕ CHECKING ЕХАНРЕЕ ) 


( 


BASIC SPECIFICATIONS ) 


SSYMBR AD 
SSYMR VAL 
БІ Ар --- VAL 1 COLDEF 3 
- ВЕ VAL AD --- 1 COLDEF ! 
БЕ VAL --- J CDLDEF . 
` 8t VAL VAL --- VAL J COLDEF + 
SL --- VAL J COLDEF 0 
БІ —- Ар) COLDEF V 
€ FORTH-PROGRAMS ) 
Ti. V; 
12У.% 
13У!, 
5149 93 
тоу! 
:T63.314 
ETZ O * 4 
:1780..У9.00.; 
1T99 Vo +V; 
( RESULTS ) 
PRSPOF ТА ФЕ VAL --- AD 1 OK 
PRSPOF Т2 SZERO ОК 
РАБРОЕ Tš SL VAL --- J QK 
ჩილიმ T4 SE Ар --- VAL 601 DK 
PRSPOF TS S[ --- 2 ОК 
PRSPOF T6 SL Ар --- 3 ОК 
PRSPDF T7 SZERO ОК 
РАЗРОЕ ТВ SL VAL --- VAL 1 OK 
ჩივის Т9 SL Ар --- VAL AD J ОК 


9I 
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( SPECIFICATIONS ) 


ჩხ 
9 


1 

2 

4 

1 COLDEF COMPILE 
1 COLDEF [COMPILE] 
3 COLDEF ?СОМР 

1 COLDEF  OBRANCH 
1 COLDEF BRANCH 

1 


Із енше COLDEF IMMEDIATE 
SL $4 Ж —- t *1 1 COLDEF SWAP 
St t --- 1 COLDEF DROP 
SL *fi Xi dX t — ttt tt t MV9M# 1 


( 


COLDEF 4ROLL 
COLDEF НЕВЕ 
COLDEF 0 
COLDEF 1 
COLDEF 2 
COLDEF 4 


St Ж — 1 COLDEF , 
St $ * —- 3 COLDEF ?РАІН5 ` 
SL t AD -- 1 COLDEF ! 


IF, ENDIF, ELSE, BEGIN, AGAIN, WHILE. 


REPEAT - FIG-FORTH ) 

IF - COMPILE OBRANCH HERE O , 2; 
IMMEDIATE 

ENDIF ?CDMP 2 ?PAIRS HERE SWAP ! ; 
IMMEDIATE 


ELSE 2 ?PAIRS COMPILE ВААМСН HERE О, 
SWAP 2 [COMPILE] ENDIF 2 ; IMMEDIATE 


BEGIN ?СОМР HERE 1; IMMEDIATE 

AGAIN 1 ?PAIRS COMPILE BRANCH . : 
IMMEDIATE 

WHILE [COMPILE3 IF DROP 4 ; 
IMMEDIATE 


REPEAT — 4ROLL გიის ГСОМРПЕЗ AGAIN 
DROP 2 [COMPILE] ENDIF ; IMMEDIATE 


{ RESULTS ) 

PRSPOF IF St == Ар 2 1 OK 
PRSPQF ENDIF SE Ар 2 — 1 OK 
PRSPüF ELSE SL Ар 2 —- Ар 21 (ІК 
РКОРОЕ BEGIN SE —— Ар 1 J DK 
PRSPDF AGAIN SE $ 1 — 1 OK 
PRSPOF WHILE SE —- Ар 4 J QK 


РКОРОЕ REPEAT SL fk 1 Ар t --- 1 OK 


СПРАВКУ 


о внедрении научных результатов лиссертационн 


работы 
ПЁЙАЛА Я.Р. "Спецификация ФОРТ-программ и их применение 
в системах построения трансляторов" 


Настоящим подтверждается, что описанный в диссертационной 
работе метод спецификации ФОРТ-программ внедрен в составе 
системы построения транелиторов ТАРТУ в ПО "CUETuAM". CIT 
ТАРТУ используется для реализации языка программирования 
ФОРТРАН на ПЭВМ "Искра-226". 

Средства, разработанные Пёйалом я.Р., позволили отладить 
описание языка ФОРТРАН. 


Зав. отд. № 8 ИВЗ 22 coec Л.А. 


— ¿s Boorem Е.Н. 


